

DM 16,- 

OS 120,-/S(r 16,- 
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Super-Kurse 

■ C-Programmierung: 
Professionelles Arbeiten 

i mit dem Amiga 

■ 68000-Assembler: 

Derleicbte 


■ Erfolgreicber programmieren 
\ mit Power-Wmdows 

I 
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großer 

V^rgleichstest 

M Werkzeuge für Programmierer: 
Editoren, C-Compiler 
md Assembler 
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Abtippen 

■ Profi-Tools für C-Compiler 

■ Trickreicb: Universelle 

■ Komfortabler Sound-Editor 
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NEU: Amiga Extra Nr. 6: 
AudioWorx 

Ihr privates Sampling-Studio. Das 
Digitalisieren von Sounds, sei es 
vom CD-Spieler, Tonband usw. ist 
mit AudioWorx ein Kinderspiel. Die 
Möglichkeit, aufgenommene Tracks 
zu verändern, sind vielfältig: Mit 
Hilfe zahlreicher Funktionen können 
Sie interessante Effekte erzeugen. 
Bestell>Nr. 38748 
DM 49,-* (sFr 45,-7öS 490,-*) 


NEU: Amiga Extra Nr. 9: Sonix 

Licht aus - woommm. Den Amiga 
an den Hifi-Verstärker. Sonix in den 
Amiga. Monitor-Spot an - yeah! Die 
Klangdimensionen des Amiga 
haben Grenzen, aber die sind weit 
gesteckt. Wie weit, das erleben Sie, 
wenn Sie die Musik auf dieser Dis¬ 
kette abspielen lassen. 13 Stücke 
sind enthalten, 

Bestell-Nr. 38753 
DM 49,-* (sFr 45,-7öS 490,-*) 


Amiga Extra Nr. 5: Spiele 

Spannende Unterhaltung mit vier 
Super-Spielen! Breaking out; Action¬ 
spiel mit schneller Grafik und tollem 
Sound. Decoder; Verwandeln Sie 
Ihren Amiga in eine Morsestation, 
Megamind: Anregende Unterhal¬ 
tung für kluge Köpfe. Wikinger It: 
Spannendes Strategiespiel, ange¬ 
siedelt im Mittelalter. 

Bestell-Nr. 38752 
DM 49,-* (sFr 44,-*/öS 490,-") 


Amiga Extra Nr. 3: Spiele 

Bliff: Eine ausgeklügelte Variante des 
Billards. Quadriga: Ein Spiel für 
Denker, angelehnt an »Vier 
Gewinnt«. Wikinger I: Ein 
Strategiespiel, angesiedelt im 
10, Jahrhundert. 

Bestell-Nr. 38724 
DM 49,-* (sFr 44,-*/öS 490,-*) 


Amiga Extra Nr. 1: Grafik 

CADos 3-D: Konstruktion und 
Rotation dreidimensionaler Körper. 
Funktionsplotter: Grafische Aus¬ 
wertung komplexer Funktionen. 
Fractai Construction Kit; Bilder einer 
fremden Welt. 
Bestell-Nr. 38708 
DM 49,-* (sFr 44,-*/öS 490,-*) 


Amiga Extra Nr. 4: Grafik 

Amiga Object Editor: The Bobbit, 
Iconmake. Booten 

Bestell-Nr. 38725 
DM 49,-* (sFr 44,-*/öS 490,-*) 


Amiga Extra Nr. 2: Disk Utilities 

DiskEd, Select Copy, DCopyll, 
Check, Bootgirl Plus. 

Bestell-Nr. 38726 
DM 49,-* (sFr 45,-*/öS 490,-*) 
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Markt&Technik-Produkte erhalten Sie im 
Computerfachgeschäft, in den Fachabteilungen 
der Warenhäuser, im Versandhandel 
und in Ihrer Buchhandlung. 




Markt&Technik 

Zeitschriften ■ Bücher 

Software • Schulung 


Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Siraße2, 

8013 Haar bei München. Telefon (089) 4613-0. 

SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415656, 

ÖSTERREICH: Markt&Technik Verlag Gesellschaft m.b.H., Große Neugasse 28, A-1040 Wien, Telefon (0222) 5871393-0; 

Rudolf Lechner&Sohn, Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526; 
Ueberreuter Media Verlagsges.mbH [Großhandel). Laudongasse 29, A-1082 Wien. Telefon (0222) 481543-0. 


Fragen Sie Ihren 
Fachhändler nach unserem 
kostenlosen Gesamtverzeichnis 
mit über 500 aktuellen 
Computerbüchern und Software. 
Oder fordern Sie es direkt 
beim Verlag an! 




















&ITDRIAL 


Wenn Sie dieses Sonderheft in den 
Händen halten, haben Sie wahrschein¬ 
lich die ersten Schritte mit dem Amiga 
bereits hinter sich. Die gewählten The¬ 
men helfen allen Programmierern, Pro¬ 
bleme zu bewältigen. 

• Der Assembler- 
Kurs erklärt die in¬ 
terne Arbeitsweise des 
Amiga. Gleichgültig, in 
welcher Programmier¬ 
sprache Sie Projekte 
realisieren, diese wich¬ 
tigen Kenntnisse brin¬ 
gen große Vorteile: Pro- 


Die Freude 
am Experiment 



Es ist noch kein Meister vom Him¬ 
mel gefallen. Diese Aussage be¬ 
stätigt sich, wenn man den Amiga ken¬ 
nenlernt. Die Vorteile, die diese lei¬ 
stungsfähige Maschine bietet, sind erst 
nach einigen Experimenten intensiv zu 
nutzen. Das gilt ebenso für das Beherr¬ 
schen komplexer kommerzieller Soft¬ 
ware wie für das Entwickeln trickrei¬ 
cher Programme. 

Vielleicht ist die Werbung von 
Commodore für die Amiga-Reihe 
daran mitschuldig, daß viele Käufer an¬ 
fangs frustriert sind. Einfach ist es je¬ 
denfalls nicht, diesem vielseitigen 
Computer immer die richtigen Antwor¬ 
ten zu entlocken. Vielleicht haben Sie 
anfangs innerlich geflucht, wenn Ihre 
Kommandos einfach nicht zum ge¬ 
wünschten Ziel führten. Mir ist es je¬ 
denfalls so gegangen, und es geht mir 
auch heute noch manchmal so. Wir be¬ 
mühen uns, alle nötigen Grundlagen in 
den AMIGA-Sonderheften so einfach 
wie möglich zu erklären. Damit erhal¬ 
ten Sie die nötige Unterstützung, be¬ 
halten den Spaß an Experimenten. 


gramme werden damit kürzer und 
schneller. 

Der umfangreiche C-Kurs zeigt, 
wie Sie die Systembibliotheken 
sinnvoll anwenden. Ein Grund mehr für 
jeden, sich diesen Kurs einmal genau 
anzusehen. 

Mit den zahlreichen Grundlagen, 
Beispiel-Listings und Tips in die¬ 
ser Ausgabe werden Sie den Amiga 
noch besser einsetzen. Vielleicht veröf¬ 
fentlichen wir dann in einem der näch¬ 
sten Sonderhefte Ihr Programm? 
Schicken Sie uns Ihre Vorschläge. Wir 
freuen uns auf viele Einsendungen. 


Ihr 

Ralf Sablowski 
(Redakteur) 






AMtGA-SONDERHEFT4 


3 






■s4^/G^ SONDERHEFT 4/89 


111 iMi 11 h I ^Miiimiiiiiiii 

6 WERKZEUGE FÜR PROGRAMMIERER 

Was brauchen Sie zum Programmieren? 

Ein Überbiick 


8 AMIGA-DOS HAT AUSGEDIENT 

Ein Vergleichstest der interessantesten Editoren 
für den Amiga 


12 LATTICE 5.0 KONTERT AZTEC 

Wir haben die neuesten Compilerversionen 
getestet und zeigen, wie man damit effektiv 
programmiert 


18 QUO VADIS, LATTICE? 

Lattice bringt mit C+ + eine brandheiße 
Erweiterung für Standard-C. Was bietet sie? 


19 ASSEMBLER IM WEHBEWERB 

Welche Fähigkeiten besitzen Assembler wie 
Devpac, Profimat und Co? Wir haben sie 
gründlich unter die Lupe genommen 


KURSE 


24 PROGRAMMIEREN MIT C H 

Ein ausführlicher Kurs für alle, die diese 
anspruchsvolle Sprache intensiv nutzen wollen 


74 ASSEMBLER H 

Der Einstieg in 68000-Assembler — verständlich 
erklärt 


WORKSHOP 




101 FENSTERLN MIT POWERWINDOWS 

Profi'Software richtig nutzen: 

Mit wenigen Mausklicks entwerfen Sie Ihre 
eigene Benutzeroberfläche 


Stellen Sie sich Ihre 
individuelle 

Werkzeugkiste zusammen 
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Fantastische 3D-Etfekte 

erzielen Sie 

mit dem Ray Tracer 


SEITE 132 


Assembler ist keine 
Alchimie. 
Schaffen Sie sich die 
nötigen Grund¬ 
lagen für eine sinnvolle 
Anwendung dieser 
faszinierenden Sprache. 

SEITE 74 
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^Alle Programme aus Artikeirt mit einem I 
service-Diskene zu diesem Sonderheft 


I-Symbol finden Sie auch auf der Programm- 
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WERKZEUGE FÜR 



Ohne das richtige Werkzeug ist Program¬ 
mieren unmöglich. Doch was gehört zur 
Ausstattung? Sie brauchen einen »Über¬ 
setzer», der Ihre Gedanken in eine dem 
Amiga verständliche Form bringt. Wer sich 
die Arbeit zusätzlich erleichtern will, der 
benötigt einen komfortablen Editor und ei¬ 
ne Programmier-Oberfläche als Ersatz für 
das CLI. Alle Werkzeuge stellen wir Ihnen 
auf den folgenden Seiten vor. 


gal, ob Sie Ihr Auto reparieren oder eine eigene Daten¬ 
bank entwickeln > ohne das passende Werkzeug 
ist beides ein aussichtsloses Unterfangen. In den 
folgenden drei Übersichten finden Sie viele 
Dinge, die das Programmieren erleichtern 
sollen; Ohne den richtigen Compiler 
oder Assembler ist Programmieren undenkbar. Auf Seite 
12 finden Sie einen Vergleich der beiden aktuel¬ 
len C-Compiler von Lattice und Manx. Die wichtigsten 
Assembler stellen wir Ihnen auf Seite 19 vor. 

Wer zum Programmieren einen eigenen Editor venwenden 
will, findet auf Seite 8 eine Gegenüberstellung einiger sehr 
komfortabler »Schreibwerkzeuge«. Wenn Sie sich nicht in 
unnötiger Tipperei bei den einzelnen Programm-Aufrufen ver¬ 
heddern wollen, sollten Sie auf eine gute Benutzeroberfläche 
nicht verzichten. Das CLI bietet hier nur wenig Hilfe. Eine gute 
Alternative ist die Shell auf Seite 115. Für Mausfans haben wir je 
eine Benutzeroberfläche für den Lattice- und den Manx-Compiler 
(Seite 121 und 124). Sie werden feststelien, daß mit diesen Werkzeu¬ 
gen Ihre Programme sich zwar immer noch nicht von selbst schreiben. 

Dafür wird Ihre Arbeit aber um einiges erleichtert. 


^EDITOREN 


Editoren sind Schreibwerk¬ 
zeuge. Beim Programmieren 
werden sie verwendet, um. den 
sogenannten Quelltext eines 
Programms einzugeben. Im 
Unterschied zur Textverarbei¬ 
tung werden hier keine Seiten¬ 
oder Druckformatierungen be¬ 
nötigt. Stattdessen ist es hilf¬ 
reich, wenn Sie den Editor mit 
verschiedenen Tastenkombina¬ 
tionen belegen können oder 
wenn verschiedene Quelltexte 
gleichzeitig zu bearbeiten sind. 

Andere hilfreiche »Beiga¬ 
ben« eines Editors sind Such- 
und Ersetzfunktionen, einfa¬ 
ches und schnelles Scrollen 
und komfortable Blockoperatio¬ 
nen. Eine Übersicht finden Sie 
auf Seite 8. Sie stellt die vier 
wichtigsten Editoren ausführ¬ 
lich vor. 




COMPILER 


Der Computer versteht nur 
Zahlenkombinationen aus Null 
und Eins - die sogenannte Ma¬ 
schinensprache. Wir sind es 
aber gewohnt, in anderen Aus¬ 
drücken zu denken als 
»01001011101«. Um die gewohn¬ 
te Denkweise des Menschen zu 
unterstützen, gibt es sogenann¬ 
te »Hochsprachen«. Diese bie¬ 
ten mit Ausdrücken wie »if« 
oder »while« eine enge Anleh¬ 
nung an die englische Sprache. 
Um diese Hochsprache in die 
Maschinensprache zu überset¬ 
zen, benötigen Sie den Compi¬ 
ler. Für den Amiga gibt es inzwi¬ 
schen viele Programmierspra¬ 
chen. Wir beschränken uns je¬ 
doch in diesem Heft auf C. Auf 
Seite 12 finden Sie einen Über¬ 
blick über die C-Compiler von 
Manx und Lattice. 
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^RGLEICHSTESl 


PROGRAMMIERER 



Neben den Hochsprachen 
gibt es für jeden Mikroprozes¬ 
sor eine Sprache, die diesem 
speziell angepaßt ist. Diese 
»Assembler-Sprache« besteht 
aus kurzen Befehlsworten, die 
eine Aktion des Prozessors be¬ 
schreiben. Auch diese muß je¬ 
doch in Maschinensprache 
übersetzt werden. Mit einem 
Assembler können Sie Pro¬ 
gramme schreiben, die die Fä¬ 
higkeiten des Prozessors opti¬ 
mal ausnutzen und die daher 
sehr kurz und extrem schnell 
sein können. Der Nachteil ist al¬ 
lerdings die - zumindest für den 
Ungeübten * schlechtere Les¬ 
barkeit des Quellcodes. 

Sie finden auf Seite 19 eine 
Übersicht der wichtigsten As¬ 
sembler, die für den Amiga er¬ 
hältlich sind. 
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AmigaDOS 


..wenn es ums 
Editieren von 
Texten geht. 
Immer mehr 
leistungsfähige 
Alternativen 
drängen auf den 
Markt. Wir haben 
die vier interessantesten verglichen. 


D ie Zeiten des guten al¬ 
ten »ED« aus dem C- 
Directory jeder System¬ 
diskette sind endgültig vorbei. 
Für ernsthaftes Arbeiten benö¬ 
tigt man vernünftiges Werk¬ 
zeug - auch beim Programmie¬ 
ren. Und da steht der Editor als 
Hilfsmittel zur Eingabe des 
Quelltextes buchstäblich an er¬ 
ster Stelle. Manche Sprachen 
(so auch AmigaBasic) haben 
zwar einen eigenen Editor ein¬ 
gebaut, jedoch stellen diese 
meistens nur die allernötigsten 
Funktionen zur Verfügung, und 
das ist für komfortables Arbei¬ 
ten einfach nicht genug. 

Der Unterschied zwischen ei¬ 
nem Editor und einem Textver- 
arbeitungs-Programm besteht 
grundsätzlich darin, daß ein 
Editor reinen ASCil-Text bear¬ 
beitet und abspeichert. Die 
Textverarbeitung dagegen ver¬ 
wendet spezielle Steuerzei¬ 
chen für die Formatierung, für 
Schriftattribute (beispielsweise 
fett, unterstrichen etc.) und an¬ 
dere Extras. Doch dies alles be¬ 
nötigen Sie normalerweise 
nicht im Quelltext ihres Pro¬ 
gramms, dort wird man niemals 
Unterstreichungen oder Block¬ 
satz finden. Man könnte also 
sagen, Editoren sind Textverar- 
beitungen, denen einfach ein 
paar Funktionen fehlen. Wie¬ 
viel tatsächlich fehlt, ob wichti¬ 
ge oder überflüssige Funktio¬ 
nen vorhanden sind, werden 
unsere vier Vergleichskandida¬ 
ten zu zeigen haben: 

- »ProEd« von Digital Projects, 
-»SuperEd« von Markt&Tech- 
nik, 

- »CygnusEd Professional« von 
ASDG sowie 

- »EdWork« von Data Becker. 

Bevor wir uns in die Details 
stürzen, wollen wir erst einmal 
sehen, was alle Kandidaten ge¬ 
meinsam zu bieten haben. Da 
ist als erstes und auffälligstes 
die Menüführung. Fast alle Be¬ 
fehle und Funktionen sind über 


Menü aufrufbar und erleichtern 
somit dem Einsteiger die Hand¬ 
habung. Der Fortgeschrittene 
kann aber trotzdem die meisten 
Menüs auch durch schnelle Ta¬ 
stendrücke ersetzen. Außer¬ 
dem zeigen sich alie vier Edito¬ 
ren in Sachen Blockbefehle 
deutlich besser gerüstet als der 
alte ED, und sie sind auch alle¬ 
samt um einiges schneller. Al¬ 
lerdings gibt es gerade in die¬ 
sem wichtigen Punkt oft deutli¬ 
che Unterschiede zwischen 
den einzelnen Programmen. 

Amateur mit 
Ambitionen 

Beim ProEd von Digital Pro¬ 
jects (Bild 1) fällt schon beim La¬ 
den ein angenehmer Service 
auf: Man bekommt das Pro¬ 
gramm in zwei Versionen, ein¬ 
mal mit englischer und einmal 
mit deutscher Benutzerfüh¬ 
rung. Nach dem Start erscheint 
dann das ProEd-Fenster auf 
dem Workbench-Screen. 

Der Textspeicher wird wie bei 
den meisten Editoren dyna¬ 
misch verwaltet, folglich ist die 
Textlänge lediglich durch die 
Größe des vorhandenen freien 
Speichers begrenzt. Alle Funk¬ 
tionen sind über Menü und Ta¬ 
statur abrufbar, beim Aufruf des 
Programms vom CLI ist aber 
auch die Übergabe von Para¬ 
metern wie Seitenlange, Zeilen¬ 
länge, Wordwrap-Funktion und 
so weiter möglich. 

Am rechten und unteren Bild¬ 
schirmrand befinden sich Schie- 
be-Gadgets, mit deren Hilfe 
man schnell einen bestimmten 
Textausschnitt in das Fenster 
schieben kann. Beim Scrolling 
des Textes über die Cursorta¬ 
sten fällt allerdings unange¬ 
nehm auf, daß eine unschöne 
Eigenart des AmigaDos-Ed 
übernommen wurde: Der Text 
wird nicht zeilenweise verscho¬ 
ben, sondern es wird jedesmal 
das Fenster gelöscht und der 


Text ab der entsprechenden Po¬ 
sition neu ausgegeben. 

Angenehm ist dagegen das 
Arbeiten in Textblöcken. ProEd 
verfügt über je zwei unabhängi¬ 
ge Block- und Zeilen-Puffer, wo¬ 
durch das Umkopieren oder 
Verschieben von Textaus¬ 
schnitten komfortabel ist. Es ist 
lediglich schade, daß Text¬ 
blöcke nur mit den Cursorta¬ 
sten und nicht mit der Maus 
markiert werden können. Dafür 
kann man aber über jeweils ei¬ 
nen Menüpunkt beziehungs¬ 
weise Tastendruck den gesam¬ 
ten Text, das Wort unter dem 


Cursor, die Cursorzeile und 
ähnliches schnell markieren. 

Vom Namen her etwas irre¬ 
führend ist der Makro-Modus. 
Hier werden nicht wie bei ande¬ 
ren Editoren Befehlssequenzen 
auf eine Taste gelegt, sondern 
lediglich Textausschnitte. Wenn 
man sich nämlich nach der 
Markierung eines solchen Aus¬ 
schnittes in den Makro-Modus 
begibt, legt man den Text auf ei¬ 
ne bestimmte Taste. Ab jetzt 
kann immer im Makro-Modus 
dieser Text durch Druck auf die¬ 
se Taste eingefügt werden. Bis 


zu 26 solcher Makro-Definitio¬ 
nen werden angenommen. Im 
Grunde genommen ist dieser 
Makro-Modus also nichts ande¬ 
res als eine leistungsfähige 
Floskeltasten-Belegung. 

Ansonsten bietet der ProEd 
wenig Besonderheiten, abge¬ 
sehen von der Speicherung 
des Textes als »Stream« (ohne 
»Carriage-Returns« und »Line- 
feeds«, zur Übernahme des 
Textes in eine Textverarbeitung) 
und der Option, beim Spei¬ 
chern von Texten automatisch 
ein Sicherheits-Backup erstel¬ 
len zu lassen. 


Von der Geschwindigkeit her 
läßt das Programm zu wün¬ 
schen übrig. Im Durchschnitt 
erwies es sich als langsamster 
Editor in diesem Test. Lediglich 
beim Text-Ersetzen lag ProEd 
noch vor den beiden Extremen 
CygnusEd und EdWork. 

Das Handbuch mit 25 Seiten 
macht einen recht verletzlichen 
Eindruck, häufiges Blättern 
wird wohl unweigerlich Zerfalls¬ 
erscheinungen nach sich zie¬ 
hen. Der Text ist auf das absolu¬ 
te Mindestmaß reduziert und 
wenig übersichtlich. Auch die 



Bild 1. Das Handbuch zu ProEd ist eher spartanisch 
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hat ausgedient... 




Bild 2. Kleine Verpackung, große Funktlonsvlelfalt: SuperEd 
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Bild 3. SuperEd wartet mit vielen Funktionen auf 


geradezu amateurhafte äußere 
Form (jedes Blatt nur einseitig 
bedruckt, keineriei Hervorhe¬ 
bungen wie Fettschrift oder Un¬ 
terstreichung. Tabelien mit nor¬ 
malen ASClI-Zeichen geba¬ 
stelt) sowie die zahlreichen 
Rechtschreib- und Grammatik¬ 
fehler unterstützen diesen 
schlechten Eindruck. 

ProEd von Digital Projects 
gehört mit einem Preis von 58 
Mark in die Sparte Billig-Soft- 
wäre, kann aber von der Lei¬ 
stungsfähigkeit her nicht mit 
den Konkurrenten mithaiten. Es 
bleibt lediglich noch die Frage, 
wie die Entwickler es geschafft 
haben, für ein solches Pro¬ 
gramm ungefähr doppelt so viel 
Speicher zu belegen (92 KByte) 
wie der direkte Mitbewerber Su¬ 
perEd (45 KByte), 

Ungefähr auf dem gleichen 
Preisniveau wie der ProEd liegt 
»SuperEd«, von Markt&Technik 
(Bild 2). Dieses Programm öff¬ 
net seinen eigenen Screen, da¬ 
durch wird der ganze 80-Zei- 
chen-Bildschirm ausgenutzt. 
SuperEd überrascht im ersten 
Moment durch fehlende Schie- 
be-Gadgets. Man wird jedoch 
mehr als entschädigt, wenn 
man mit gedrückter linker 
Maustaste an den unteren Bild¬ 
schirmrand fährt. Der Text rea¬ 
giert, indem er nach oben 
wegscrollt. Dasselbe gilt umge¬ 
kehrt für den oberen Rand - ei- 


Variante, die noch dazu eine ra¬ 
sante Geschwindigkeit an den 
Tag legt. 

SuperEd bietet zwei Block- 
und einen Zeilen-Puffer, mit de¬ 
nen die üblichen Operationen 
ausgeführt werden. Die Markie¬ 
rung von Textausschnitten 
funktioniert sehr angenehm. 
Ein einzelnes Wort wird durch 
zweimaliges Anklicken mar¬ 
kiert, ein Block dagegen, indem 
man bei gedrückter rechter 
Maustaste den Bereich mit der 
Maus überstreicht. Gegebe¬ 
nenfalls scrollt der Text auch 
automatisch weiter, wenn der 
Mauszeiger dabei an einen 


ne sehr angenehme Scroll- 
Bildschirmrand stößt. Im Zu¬ 
sammenhang damit recht inter¬ 
essant ist auch die Undo-Funk- 
tion. Damit werden unbeab¬ 
sichtigte Änderungen inner¬ 
halb einer Zeile wieder rück¬ 
gängig gemacht. 

Die Ausgabe des Textes auf 
einen Drucker wurde besser als 
in mancher Textverarbeitung 
gestaltet. SuperEd startet einen 
sogenannten Druckerspooler 
als eigenständigen Task. Dies 
ist ein eigenes Programm, das 
neben dem eigentlichen Editor 
läuft und den Text an den Druk- 
ker weitergibt. Dadurch ist der 
Editor sofort wieder zur Arbeit 
bereit, die Druckerausgabe 
läuft unabhängig weiter. Soweit 
gewünscht, wird als Textkopf 
der Name der Datei sowie das 
aktuelle Datum automatisch 
mitausgegeben. Auch erfolgt 
der Druck auf Wunsch in den 
Standard-Schriftarten NLQ, Pi¬ 
ca, Elite oder Fine. 

Die Funktionen Upper-, 
Lower- und Switch-Case än¬ 


dern in einem markierten Text¬ 
ausschnitt entweder alle Groß¬ 
in Kleinbuchstaben, alle Klein¬ 
in Großbuchstaben, oder sogar 
beides gleichzeitig. Normaler¬ 
weise besteht ein Quelltext le¬ 
diglich aus Text. Doch in Aus¬ 
nahmefällen ist auch die Einga¬ 
be von beliebigen ASCII- 
Zeichen praktisch oder gar nö¬ 
tig. SuperEd ermöglicht die 
Eingabe solcher Sondercodes 
in Form von Hexadezimal¬ 
zahlen. 

Für die Aufnahme von Flos¬ 
keltexten stehen die Funktions¬ 
tasten zusammen mit der Shift- 
Taste zur Verfügung. Es stehen 


also maximal zehn verschiede¬ 
ne Floskeltexte bereit. 

Wer während des Editierens 
einmal eine Datei auf Diskette 
löschen oder einen DOS-Be- 
fehl ausführen will, der braucht 
den Editor nicht zu verlassen, 
sondern kann ein CLI-Fenster 
öffnen und nach Gebrauch wie¬ 
der schließen. 

Für umfangreichere Aktio¬ 
nen neben dem Editieren aber 
hat SuperEd noch eine prakti¬ 
sche Variante zu bieten: die so¬ 
genannte »Hot-Mouse«. Schal¬ 
tet man diese Option ein (Bild 3) 
und beendet das Programm, so 

Meisterhaft 

wird der Task nicht aus dem 
Speicher entfernt, sondern 
bleibt aktiv. Nun kann man zum 
Beispiel den gerade geschrie¬ 
benen Quelltext compilieren. 
Um nun wieder in den Editor zu 
gelangen, genügt es, beide 
Maustasten gleichzeitig zu 
drücken, und schon ist der Edi¬ 
tor wieder da, auf Wunsch auch 
mit dem alten Text. 

Insgesamt arbeitet der Su¬ 
perEd ziemlich schnell. Ledig¬ 
lich aufgrund des »Wordwrap- 
pings« kann es zu unangeneh¬ 
men Verzögerungen kommen. 
Paßt nämlich das eben ge¬ 
schriebene Wort nicht mehr in 
die aktuelle Zeile, so wird es in 
die nächste umkopiert. Dies 
dauert allerdings so lange, daß 
während des Kopierens bei 
schnellem Schreiben regelmä¬ 
ßig Tastendrücke ignoriert wer¬ 
den - ein Schönheitsfehler, der 
bei längeren Fließtexten die 
Nerven des Benutzers doch er¬ 
heblich belastet. 

Das »Handheft« umfaßt 35 
Seiten, ist übersichtlich (wenn 
auch nicht allzu ausführlich) 
und leicht verständlich. Somit 
erhält man für den Preis von 39 
Mark ein schnelles und hilfrei¬ 
ches Werkzeug. SuperEd ist 
das preiswerteste und mit 45 
KByte auch kürzeste Pro¬ 
gramm in diesem Test. 

Der »CygnusEd« von ASDG 
(Bild 4) kann mit gutem Recht 
als Sensation bezeichnet wer¬ 
den. Er bietet eine unübertroffe¬ 
ne Vielzahl von durchdachten 
und hilfreichen Befehlen und 
Funktionen. Zudem ist er über 
die Sprache ARexx bei Bedarf 
programmier- und erweiterbar. 

Schon beim Nachladen einer 
Datei im »File-Selector« (Bild 5) 
fällt die neue Scroll-Routine 
auf. Wo bei allen anderen Pro- 
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darf neu laden, womit man 
wertvolle Zeit spart. 

Das Programm bietet auch 
echte Makros, mit denen man 
beliebige Befehle und Funktio¬ 
nen durch lediglich eine Tasten¬ 
kombination aufrufen kann. Na¬ 
türlich lassen sich auch diese 
Makros abspeichern. Mit Ma¬ 
kros verwandt ist der Befehl 
»Repeat key/menu«, womit sich 
ein Menü- oder Tastaturbefehl 
bis zu einer Milliarde mal auto¬ 
matisch wiederholen läßt. 

Beim Programmieren von 
langen C-Programmen oder 
auch komplizierten Formel- 
Ausdrücken verirrt man sich oft 
in geschachtelten Klammer¬ 
ebenen. CygnusEd sucht auto¬ 
matisch zu einer geöffneten 
Klammer die entsprechende 
geschlossene und andersher¬ 
um. Bei langen Quelltexten 
sind die Marken praktisch - ei¬ 
ne Art zweidimensionaler Tabu- 
Bild 4. Eine Meisterleistung ist der CygnusEd von ASDG lator. Bis zu drei Stellen im Text 


Bild 5. Der File-Selector von CygnusEd ist ein Beispiel für 
sauber durchdachte Hilfestellung für den Benutzer 


grammen der Text zeilenweise 
verschoben wird, geschieht das 
bei CygnusEd punktweise und 
beliebig fein. Die damit erreich¬ 
te Übersichtlichkeit und Ge¬ 
schwindigkeitsind begeisternd. 
Es ist wahrscheinlich unmög¬ 
lich, alle Vorteile des CygnusEd 
gegenüber anderen Editoren 
aufzuzählen, wir beschränken 
uns auf die interessantesten 
Highlights. 

Zu diesen gehört zum Bei¬ 
spiel die Option, mehrere Texte 
in verschiedenen Fenstern un¬ 
abhängig voneinander zu bear¬ 
beiten, Selbstverständlich kön¬ 
nen Sie dabei Blöcke zwischen 
den verschiedenen Fenstern 
hin- und herkopieren. Diese zu¬ 
sätzlichen Fenster können be¬ 
liebige Ausmaße annehmen. 
Als Basis können alle übergro¬ 
ßen Formate (Overscan) bis zu 
704 x 584 Punkten (in Interlace) 
eingestellt werden. Auch belie¬ 
big große Screens sind möglich 
(beispielsweise mit dem PD- 
Programm »VScreenHandler«), 
allerdings sind dann natürlich 
nur Ausschnitte am Monitor er¬ 
kennbar. Auf Wunsch kann der 
Editor seine Fenster im Work- 
bench-Screen oder in einem ei¬ 
genen Screen öffnen. 

Wer den Editor als zweiten 
oder höheren Task laufen läßt, 
gibt im Menü die gewünschte 
Task-Nummer ein, um die ver¬ 
fügbare Rechenzeit auf die ver¬ 
schiedenen Programme aufzu¬ 
teilen. 

Hat man einige Zeit (genauer 
gesagt; 15 Minuten) mit dem 
CygnusEd gearbeitet, so macht 
sich eine ganz besondere 
Funktion bemerkbar: das Auto¬ 
save. Das Programm öffnet ei¬ 
nen Requester, teilt Ihnen die 


vergangene Zeit seit dem letz¬ 
ten Abspeichern (voreingestellt 
sind 15 Minuten) sowie die Zahl 
der seither vorgenommenen 
Veränderungen mit. Auf 
Wunsch wird nun der Text ab¬ 
gespeichert. Der Timer für Au¬ 
tosave kann über Menü gestellt 
beziehungsweise ausgeschal¬ 
tet werden. Das sogenannte 
»Safe Saving« verwendet eine 
Temporärdatei, um patenverlu- 
sten während des Überschrei¬ 
bens der alten Datei vorzubeu¬ 
gen. 

CygnusEd verfügt wie Super- 
Ed über eine Hot-Start-Funk- 
tion. Das Programm, welches 
nach dem Beenden noch im 
Speicher steht, wird hierbei mit 
einer Tastenkombination wie¬ 
der gestartet. Sie können die¬ 
sen Task auch mit einer ande¬ 
ren Tastenkombination entfer¬ 
nen (beispielsweise wenn beim 
Compilieren der Speicher 
knapp wird). Die gesamten Vor¬ 
einstellungen von Autostart, 
Autosave, Bildschirmgröße, 
Task und vieles mehr lassen 
sich auf Wunsch auch gesam¬ 
melt abspeichern und bei Be- 


können markiert und dann di¬ 
rekt angesprungen werden. 

Leider bietet CygnusEd le¬ 
diglich einen einzigen Block- 
Puffer, der aber auf jede er¬ 
denkliche Art manipuiierbar ist 
- bei der sonstigen Vielfalt an 
ausgeklügelten Funktionen ge¬ 
radezu erstaunlich. Suchen 
und Ersetzen dagegen wird 
nicht nur vorwärts oder rück¬ 
wärts, sondern bei Bedarf auch 
mit Wiidcards, also Platzhal¬ 
tern, durchgeführt. 

Der Ausdruck von Texten 
oder Textblöcken wird beim 
CygnusEd wie beim SuperEd 
von einem Spooler mit eigenem 
Task übernommen (siehe 
oben). Dieser bietet zudem 
noch die Option, aus dem 
Quelltext Tabulatoren in Leer¬ 
zeichen und andersherum zu 
verwandeln. Somit gibt es keine 
Probleme mit der Druckeran¬ 
passung. 

Wem alle diese Funktionen 
immer noch nicht genug sind, 
der kann CygnusEd auch noch 
programmieren. Dazu ist aller¬ 
dings ein Interpreter der Spra¬ 
che »ARexx« vonnöten, welche 



in Amerika (dem Herkunftsland 
von CygnusEd) sich mehr und 
mehr zum Standard entwickelt. 
Mit ihrer Hilfe kann der an¬ 
spruchsvolle Benutzer noch ei¬ 
gene Formatierungsroutinen 
oder andere Textbearbeitungen 
programmieren. Der ARexx-ln- 
terpreter kostet 50 Dollar. 

Im Geschwindigkeitsver¬ 
gleich ist CygnusEd der 
schnellste Editor (wie schon er¬ 
wähnt auch beim Scrollen), mit 
der Ausnahme der Ersetz- 
Funktion. Diese zeigt nämlich 
jede vorgenommene Änderung 
sofort am Bildschirm an, womit 
natüriich viel Zeit verbraucht 
wird. Auf den ersten Blick mag 
das zwar wegen der Ausfüh¬ 
rungszeit als Nachteil erschei¬ 
nen, für den Programmierer 
bietet es aber eine einfache 
Kontrolle über alle Änderun¬ 
gen. Auch wenn bei der Ver¬ 
wendung von Wildcards verse¬ 
hentliche Änderungen vorge¬ 
nommen wurden, erkennt man 
diese sofort. 

Das Handbuch ist erfreulich 
solide, sowohl vom Inhalt als 
auch vom Material her. Es ist 
übersichtlich und erklärt allge¬ 
meine Benutzerhinweise sowie 
kompliziertere Besonderheiten 
ausführlich in gesonderten Ka¬ 
piteln. Ein Nachteil mag die 
englische Sprache sein, das 

Ausbau 

eingebaut 

Handbuch wurde nämlich bis 
jetzt noch nicht übersetzt. 

Bei einem Preis von 198 
Mark liegt dieser Editor aber 
auch in der gehobenen Preis¬ 
klasse. Doch für Programmie¬ 
rer ist dieses Programm eine 
leistungsfähige Hilfe und ganz 
sicher sein Geld wert. 

Haben Sie mit Ihrem Editor 
schon einmal »Breakout« oder 
»TicTacToe« gespielt? Mit »Ed- 
work« von Data Becker (Bild 6) 
ist dies kein Problem, wenn der 
erste Eindruck dies auch nicht 
vermuten läßt. Wer EdWork 
nämlich einfach so aufruft, der 
findet sich in einem Programm 
mit dem Bedienungskomfort 
des AmigaDOS-Ed. Es sind kei¬ 
ne Menüs installiert, und die 
Befehle werden über Escape- 
Sequenzen aufgerufen. 

Der Grund dafür: Dieses Pro¬ 
gramm ist weniger ein Editor als 
vielmehr ein Sprach-Compiler 
mit einigen Fertigteilen - sozu¬ 
sagen ein »Bausatz«. Die dazu¬ 
gehörige Sprache heißt EPL 
(Editor Programming Langua- 
ge). Damit kann der Bediener 
Menüs erstellen, Funktionen 
zusammenbasteln und Tasten 
beliebig belegen. Dazu wird 
noch ein Compiler geliefert, der 
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EPL in Maschinencode über¬ 
setzt und so die Ausführungs¬ 
geschwindigkeit wesentlich er¬ 
höht. 

Damit der Benutzer nun nicht 
gleich programmieren oder das 
EPL-Programm auf einem ta¬ 
stengesteuerten Editor schrei¬ 
ben muß, werden schon einige 
fertige Compilate mitgeliefert. 
Darunter befinden sich Anpas¬ 
sungen, die EdWork bedie¬ 
nungskompatibel zu Profimat, 
Textomat, TxED oder dem Ami- 
gaDOS-Ed machen (Bild 7). 

Außerdem mitgeliefert wer¬ 
den Demoprogramme, die Spe¬ 
zialitäten und Leistungsfähig¬ 
keit des EdWork demonstrie¬ 
ren, so zum Beispiel die beiden 
oben genannten Spiele. Prakti¬ 
sche Anwendungen sind zum 
Beispiel der C- und Assembler- 
»Beautyfier«. Die beiden Pro¬ 
gramme formatieren Quelltex¬ 
te, um eine bessere Lesbarkeit 
zu erreichen. Auch eine Sortier¬ 


bereiche einfach weg, sie wer¬ 
den also unsichtbar, sind aber 
immer noch im Textspeicher 
vorhanden. Bei Bedarf faltet 
man sie dann wieder auf. Wer 
zum Beispiel die am Anfang 
fast jedes C-Programms ste¬ 
henden Standard-Strukturen 
für Screen, Window und so wei¬ 
ter wegfaltet, verkürzt den 
Quelltext optisch und sorgt so 
für Übersichtlichkeit. 

Wie jede Standard-Program¬ 
miersprache bietet EPL die 
Verwendung von Variablen, 
Grundrechenarten und Ver¬ 
gleichsoperatoren. Auch 
Schleifen und bedingte Ausfüh¬ 
rung sind implementiert. Und 
dazu eine große Zahl editorspe¬ 
zifischer Befehle. 

Für Blockmanipulationen 
stehen neben den Befehlen das 
sogenannte Folding zur Verfü¬ 
gung. Außerdem hantiert man 
mit mehreren Blöcken gleich¬ 
zeitig, indem man die Blockda- 



Bild 6. Das Handbuch zu EdWork Ist eine ergiebige 
Informationsquelle für Einsteiger wie für Profis 


routine ist auf der Diskette zu 
finden. 

Wer aber einen wirklich gu¬ 
ten und einigermaßen komfor¬ 
tablen Editor haben möchte, 
der kommt nicht darum, sich 
durch die über 120 Befehle von 
EPL zu kämpfen. Hier sind ins¬ 
gesamt bis zu 65534 Makros 
frei definierbar, was für den An¬ 
fang wohl reichen wird. 

Eine der herausragenden 
Besonderheiten, welche mit 
EdWork realisierbar sind, ist 
das sogenannte »Folding«. Da¬ 
bei faltet man unwichtige Text- 


ten einfach auf einen entspre¬ 
chenden Stack auslagert und 
später wieder holt. Natürlich 
umfaßt EPL auch alle Befehle 
zur Cursorbewegung, zum Lö¬ 
schen und zum Einfügen. Für 
Suchen und Ersetzen gibt es 
eine äußerst leistungsfähige 
Wildcard-Verarbeitung. Bei un¬ 
beabsichtigtem Löschen einer 
Zeile hilft ein Undo-Befehl, 

Die gesamte Datei wird auf 
Programm-Befehl auch gespei¬ 
chert, geladen oder ausge- 
drucW; an einen Spooler wurde 
leider nicht gedacht. Auch die 


Ausgabe des Textes auf den 
Bildschirm ab beliebiger Posi¬ 
tion mit anderen Parametern 
stellt kein Problem dar. 

Wichtige Editor-Parameter 
werden mit den »Set«-Befehlen 
eingestellt. Hier wird über den 
Refresh-Modus des Fensters 
und die Task-Priorität, aber 
auch über die Tastenbelegung 
entschieden. Außerdem kann 
ein EPL-Programm auch ein 
anderes aufrufen, komplexen 
Schachtelungen steht nichts im 
Wege. Entsprechend den nor¬ 
malen Tasten werden auch die 
Maustasten auf Wunsch mit 
Funktionen belegt. Eine eigene 
Scroll-Routine wie bei SuperEd 
oder CygnusEd ist somit kein 
Problem. Der normale Weg für 
die Maussteuerung ist aller¬ 
dings die Programmierung von 
Menüs, die in allen Details 


(Checkmarks, Disabling} unter¬ 
stützt wird. 

Außerdem ist man nicht auf 
ein Fenster beschränkt. Die 
Window-Befehle öffnen, ver¬ 
schieben, vergrößern, aktivie¬ 
ren und schließen beliebig 
neue Editor-Fenster. Und wem 
diese Befehlsvielfalt nicht 
reicht, der kann auch noch CLI- 
Befehle ausführen lassen. 

Im Geschwindigkeitsver¬ 
gleich ist EdWork schneller als 
ProEd, wozu allerdings nicht 
viel gehört. Die Ersetzen- 
Funktion zeigt den gleichen 
Nachteil (oder Vorteil, je nach 
Betrachtungsweise) wie Cyg¬ 
nusEd; Der Text wird zur Kon¬ 
trolle unmittelbar am Bild¬ 
schirm ersetzt, was die Ausfüh¬ 
rungszeit in die Länge zieht, da¬ 
für aber dem Programmierer 
mehr Sicherheit bietet. EdWork 
ist hier aber immer noch drei¬ 
mal schneller als CygnusEd. 

Das Handbuch ist wohl das 
einzige in diesem Vergleich, 
das diesen Titel mit vollem 
Recht trägt. Es umfaßt 360 Sei¬ 


ten und ist im üblichen Data- 
Becker-Stil hergestellt. Es er¬ 
klärt EdWork und seine Funk¬ 
tionen übersichtlich und von 
Grund auf, womit auch das Er¬ 
lernen von EPL erleichtert wird. 

Denn um in den Genuß eines 
wirklich guten Editors zu kom¬ 
men, läßt sich die Programmie¬ 
rung nicht umgehen. Diese gibt 
Ihnen zwar ein zweifellos lei¬ 
stungsstarkes Werkzeug in die 
Hand, doch zahlreiche Beson¬ 
derheiten des CygnusEd (zum 
Beispiel Autosave oder Hot¬ 
start) sind trotzdem nicht oder 
nur sehr schwer realisierbar. 
Bei CygnusEd müssen Sie 
zwar die Programmiersprache 
extra bezahlen, dafür wird aber 
der Umfang des Editor auch 
nicht damit belastet. 

CygnusEd bietet eine un¬ 
übertroffene Leistungsvielfalt 


mit Funktionen, die auch nach 
langer Arbeit immer noch posi¬ 
tive Überraschungen zu bieten 
haben. Er ist für den engagier¬ 
ten Programmierer ein unver¬ 
zichtbares Hilfsmittel. Mit Ed- 
Works wurde eine sehr gute 
Idee verwirklicht, die Benutzer¬ 
oberfläche im Eigenbau. Sie 
können sich jede beliebige Ta¬ 
stenbelegung definieren - be¬ 
sonders für den Umsteiger von 
anderen Computern eine nette 
Sache. Der SuperEd ist in sei¬ 
ner Preisklasse völlig konkur¬ 
renzlos. Vieles wurde verblüf¬ 
fend einfach verwirklicht, was 
entscheidend zur geringen 
Länge von 45 KByte beiträgt. 

(Nikolaus Huber/so) 

Anbieter: 

ProEd: AtlarMis, Postfach 1141.5030 Hürth, Tel. 
02233/41081 

SuperEd; M&T-Verlag, Hans-Pinsel-Straße 2, 
8013 Haar bei München 
CygnusEd: Atlantis, Postfach 1141, 5030 
Hürth, Tel. 02233/41081 
ARexx (Programmiersprache zu CygnusEd): 
William S. Hawes, P. O. Box 308 Maynard, MA 
01754, USA, Tel: 001/508 568 8695 
EdWork: Data Becker GmbH, Merowingerstra¬ 
ße. 30, 4000 Düsseldorf 
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Bild 7. Bei EdWork werden viele Erweiterungsprogramme 
mitgeliefert 
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Seit es den Amiga gibt, scheiden sich 
die Geister am »richtigen» C-Com- 
piler. Lattice und Aztec beherrschen seit 
langem den Markt. Bisher sah es nach einem deut¬ 
lichen Punktvorteil für Aztec aus. 
Kann Lattice mit seiner neuesten Version die 
Gunst der Programmierer gewinnen? 


Lattice SjO 
kontert 
Aztec 


S owohl der Lattice* {Bild 
1) als auch der Aztec* 
Compiler (Bild 2) bieten 
in ihren neuesten Versionen ei* 
nen enormen Leistungsum* 
fang. Wir haben beide Compi¬ 
ler für Sie unter die Lupe ge¬ 
nommen. Die Vor-und Nachtei¬ 
le der aktuellen Versionen schil¬ 
dert dieser Artikel. Außerdem 
geben wir Ihnen Tips, die Sie 
beachten sollten, um effektive 
Programme zu erhalten. 

Wir wollen Ihnen hier nicht 
nur bei der Entscheidung für Ih¬ 
ren ersten C-Compiler helfen, 
sondern auch dem fortgeschrit¬ 
tenen C-Anhänger interessante 
Hintergrundinformationen ge¬ 
ben, die für einen objektiven 
Vergleich der beiden Compiler 
unerläßlich sind - und trotzdem 
oft unbeachtet bleiben. Zum 
Test standen uns jeweils die 
neuesten Versionen zur Verfü¬ 
gung, der Aztec 3.6a und der 
Lattice 5.0, beide mit Source- 
Level-Debugger. 

Unentbehrlich: 

Englisch¬ 

kenntnisse 

Leider muß man nach dem 
Auspacken seines neuen C- 
Compilers (wie auch der mei¬ 
sten anderen Software-Pakete) 
immer noch feststellen, daß oh¬ 
ne fundierte Englisch-Kenntnis- 
se »nichts geht«. Noch immer 
werden Handbücher in dieser 
Sprache verfaßt und selten ge¬ 
nug für den deutschen Markt 
übersetzt. Aber wie ist es um 
die Qualität dieser Anleitungen 
bestellt? 

Wir erhalten bei beiden 
Compiler-Paketen dicke Hand¬ 
bücher. Beide setzen voraus. 


daß man C bereits beherrscht. 
Natürlich kann ein Handbuch 
nicht dazu dienen, die Pro¬ 
grammiersprache zu erlernen, 
beide geben jedoch entspre¬ 
chende Literaturhinweise. 

Bequemes 

Arbeiten 

Lattice wartet mit einer etwas 
besseren Strukturierung des 
Handbuchs auf; es ist leichter 
zu lesen und erläutert die Instal¬ 
lierung des Pakets besser. Auf 
mögliche Konsequenzen eini¬ 
ger Compileroptionen wird so¬ 
fort hingewiesen. Bei Aztec hin¬ 
gegen erhält man entsprechen¬ 
de Informationen manchmal 
erst, wenn man die Bibliothe¬ 
ken durchstöbert hat. 

Um mit einem Compiler »be¬ 
quem« arbeiten zu können, 


sind gewisse Voraussetzungen 
nötig. Beispielsweise machen 
512 KByte Speicher und nur ein 
Laufwerk die Arbeit oft genug 
zur Qual. Doch was ist zum Pro¬ 
grammieren wirklich nötig? 

Wir sollten bedenken, daß 
ein Editor, der Compiler, der 
Linker, die Include-Files und 
(beim Aztec) der Assembler 
ständig gebraucht werden. Au¬ 
ßerdem muß natürlich der Spei¬ 
cherbedarf des zu bearbeiten¬ 
den Programms mitberechnet 
werden. Müssen alle diese Pro¬ 
gramme jedesmal von Diskette 
geladen werden, dann macht 
sich dies in einer erheblichen 
Beeinträchtigung der Arbeits¬ 
geschwindigkeit bemerkbar. 

Um alles Benötigte im Spei¬ 
cher zu halten, ist ein enormer 
Speicherausbau nötig. Eine 
Festplatte ist eine weitere Mög¬ 
lichkeit, die Ladezeiten erheb¬ 


Bild 1. Groß und mächtig - Lattice C 



lieh zu verringern. Der optimale 
Ausbau dürfte jedoch eine 
Kombination aus Festplatte und 
erweitertem Speicher sein. 

Der Speicherbedarf des 
Aztec-Entwicklungssystems ist 
deutlich geringer als der von 
Lattice. Das zeigt sich schon 
daran, daß es möglich ist, alle 
nötigen Dateien auf eine einzi¬ 
ge Diskette zu kopieren und da¬ 
mit zu arbeiten, ohne »Disk¬ 
jockey« spielen zu müssen. Bei 
Lattice ist hier schon ein zwei¬ 
tes Laufwerk zwingend erfor¬ 
derlich. 

Als sehr hilfreich hat sich die 
Möglichkeit beider Compiler 
herausgestellt, Include-Files 
vorab zu compilieren, so daß oft 
gebrauchte Includes in einer 
einzigen Datei untergebracht 
werden. Das spart natürlich 
Speicherplatz auf Diskette und 
unnötige Zugriffe. Diese Funk¬ 
tion wurde bei Lattice erst seit 
der neuesten Version hinzuge¬ 
fügt. Sie ist nach unseren Er¬ 
fahrungen für eine erträgliche 
Compilationszeit dringend not¬ 
wendig, da der Zugriff auf viele 
Include-Files von Diskette 
manchmal eine mehrminütige 
Länge annehmen kann. 

Man sollte sich vor Augen 
halten, daß man - zumindest 
mit dem Aztec - zwar mit 512 
KByte Arbeitsspeicher und ei¬ 
nem Laufwerk programmieren 
kann. Vernünftiges Arbeiten ist 
damit aber noch lange nicht ge¬ 
währleistet. Wenn Sie alle stän¬ 
dig benötigten Programme im 
RAM halten und beim Compi¬ 
lieren und Linken nicht ständig 
auf Diskette zugreifen wollen, 
sollten Sie etwa 2,5 MByte und 
zwei Laufwerke besitzen. Aller¬ 
dings werden Lattice-Anwen- 
der auch bei dieser Konfigura¬ 
tion den Wunsch nach einer 
Festplatte nur schwer unter¬ 
drücken können, wenn der 
Compiler voll genutzt werden 
soll. 

16 oder 32 Bit? 


Um Gurus zu vermeiden, hat 
es sich bei Aztec eingebürgert, 
jeden Compilerlauf mit der Op¬ 
tion »-t-l« zu starten, so daß der 
Datentyp »int« immer mit 32 Bit 
Breite angelegt wird. Dies hat 
den unschätzbaren Vorteil, daß 
die meisten Public Domain- 
Quelltexte ohne Beanstandung 
zum Laufen gebracht werden. 
Außerdem erhöht man die Kom¬ 
patibilität zum Lattice-Compiler, 
bei dem 32-Bit-lnteger vorein- 
stelltsind. Der Gebrauch dieser 
Option hat allerdings auch 
Nachteile. Diese werden beim 
Programmieren leicht überse¬ 
hen, tragen aber allzuoft einen 
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immensen Teil zu einem 
schlechten Compiiat bei: 

- Sämtliche Funktionsargu¬ 
mente werden als Langworte 
auf den Stack gebracht, egal 
welche tatsächliche Datenbrei¬ 
te vorhanden ist. 

- Rückgabewerte von Funktio¬ 
nen sind grundsätzlich Lang¬ 
worte. 

- Die Berechnung eines Aus¬ 
drucks erfolgt ausschließlich 
auf der Basis von 32 Bit, selbst 
wenn »short int« oder »char« an¬ 
gegeben ist. 

- Konstanten werden immer als 
Langwort angesehen. 

Das bringt so manche unnöti¬ 
ge Umrechnung mit sich, da 
nicht als Langworte deklarierte 
Variablen stillschweigend mit 
dem Maschinenbefehl »EXT« 
vorzeichenrichtig auf 32 Bit er¬ 
weitert werden müssen. Bei¬ 
spielsweise müßte ein 16-Bit- 
Funktionsargument erst aus 
seiner Speicherzelle in ein Da¬ 
tenregister geladen, dann auf 
32 Bit erweitert und schließlich 
auf dem Stack abgelegt wer¬ 
den. Das sind zwei zusätziiche 
Anweisungen, die Zeit und 
Speicherplatz kosten. Noch 
schlimmer wird es, wenn man 


Der Aztec-Code 


Dieses C-Listing... 
short a,b,c; 
mainO 

[ aaa#(b+c); 

func{a); 

I 

,. .übersetzt Aztec mit der»+l«- 
Option zu folgendem Assem- 
bierlisting: 
move.w _b,dO 
ext.l dO 
move.w _c,dl 
ext.1 dl 

add.l dl,dO 
move.w _a,dl 
ext.l dl 

jsr .raulu# 

move.w dO,_a 
move.w _a,dO 
ext. 1 dO 
move.l dO,-(sp) 
jsr _func 

add.w #4,sp 
Einen wesentlich effektiveren 
Code erhält man aber mit 16- 
Bit-Integer, wenn man diese 
Option wegläßt: 


movem.l 

•3,-(sp) 

move.w 

_b,dO 

add.w 

_c,dO 

muls.w 

_a,dO 

move.w 

dO,_a 

move.w 

-a>-(sp) 

jsr 

add.w 

#2,sp 


Bild 3. Aztecs »+I«-Option 
birgt auch Nachteile In sich... 


mit 8 Bit, also mit dem Typ 
»char«, arbeitet, bei dem dann 
schon zwei »EXT«-Anweisun- 
gen notwendig sind. Wie man 
sieht, bekommt man mit kleine¬ 
rer Datenbreite keinen schnel¬ 
leren Code, eher ist das Gegen¬ 
teil der Fall. Es ist also sinnvoll, 
32-Bit-Variablen zu benutzen, 
soweit dies möglich ist. Dieser 
Sachverhalt gilt natürlich für 
beide Compiler, wie Bild 3 und 4 
verdeutlichen. 

Eine andere Möglichkeit ist 
es, bei Aztec die »-i-l«-Option 
wegzulassen oder bei Lattice 
»-W« zu ergänzen, so daß intern 
16 Bit angenommen werden 
und unnötige Langwortopera¬ 
tionen wegfalien. Der Pro¬ 
grammcode wird so kompakter. 


bei tiefer Rekursion wird der 
Stack im günstigsten Fall nur 
um die Hälfte belastet. Das 
klingt zwar schön, erfordert 
aber auch eine sehr sorgfältige 
Programmierung - besonders 
wenn es um den Aufruf von 
Amiga-spezifischen Funktio¬ 
nen geht. Man muß jetzt näm¬ 
lich im Hinterkopf behalten, daß 
der Compiler Funktionsargu¬ 
mente genau ihrem Typ ent¬ 
sprechend stapelt, eventuelle 
Konstanten werden als Wort be¬ 
handelt. Aber alle Amiga-Funk- 
tionen erwarten 32 Bit, auch 
wenn man selbst nur 16 Bit ver¬ 
mutet. Das gleiche gilt für die 
Funktionswerte, die nun, wenn 
nicht ausdrücklich anders an¬ 
geordnet, als Wort zurückgege¬ 
ben werden. So kann es bei Un¬ 
achtsamkeit schon mal passie¬ 
ren, daß ein Pointer bei der 
Rückgabe halbiert wird (was 
den Guru weckt). Deshalb las¬ 
sen sich so viele Public Domain 
Programme nur mit 32-Bit-lnte- 


gern compilieren. Der Lattice- 
Compiler kann hier übrigens 
sehr gut Hilfestellung geben, 
wie wir gleich noch sehen wer¬ 
den. 

Allen Programmierern ver¬ 
haßt sind die Compilerwar- 
nings. Das sind Hinweise des 
Compilers auf Unsauberheiten 
im Code, die eventuell zu Pro¬ 
blemen während der Laufzeit 
führen können. Dies ist auf dem 
Amiga in der Tat ein Problem, 
das nicht so leicht in den Griff 
zu bekommen ist. Man könnte 
die Warnings zwar einfach mit 
einer Compileroption ausblen¬ 
den, aber ob dies der richtige 
Weg ist? Hinsichtlich eines sau¬ 
beren Programmierstils läßt 
sich diese Frage sicher vernei¬ 


nen. Aber selbst diesbezüglich 
ehrgeizigere Freaks sollen 
schon gescheitert sein, um 
dann doch reumütig drei Zei¬ 
chen mehr ins CLl zu tippen 
und die Warnings doch noch 
abzuschalten. 

Compiler- 
warnings einfach 
ignorieren? 

Dabei ist das Problem immer 
das gleiche: Es werden Werte 
an Zeiger übergeben, die nicht 
vom gleichen Typ sind, zumin¬ 
dest aus der Sicht des Compi¬ 
lers. Und genau dies wird dem 
Programmierer mitgeteilt. Bei 
der Fülle von verschiedenen 
Strukturen und deren Pointern 
im Amiga-Betriebssystem kann 
man leicht den Überblick verlie¬ 
ren. Grundsätzlich läßt sich die¬ 
ses Problem aber umgehen, in¬ 
dem man bei den entsprechen¬ 
den Anweisungen eine explizite 


Typumwandlung mit Hilfe des 
Cast-Operators durchführt. Al¬ 
lerdings kann der Programm¬ 
code dadurch unübersichtli¬ 
cher werden. Bei Aztec bietet 
sich daher folgende Methode 
an: In dem Ordner für die Inclu- 
des befindet sich ein File na¬ 
mens »functions.h«, das sozu¬ 
sagen den Compiler über die 
Rückgabetypen sämtlicher 
Amigafunktionen aufklärt. So 
wird schon ein sehr großer Teil 
potentieller Warnings vermie¬ 
den. 

Prototypes 
und Functions 

Wenn man sich für die 16-Bit- 
Integer-Verarbeitung entschie¬ 
den hat, ist eine korrekte Funk¬ 
tionswertrückgabe garantiert. 
Beim Lattice-Compiler bindet 
man entsprechend der benutz¬ 
ten Funktionen Include-Files 
aus dem Ordner »proto« ein. 
Diese übernehmen unter ande¬ 
rem das sogenannte »Argu¬ 
ment Type Checking«, auch 
»Functions Prototyping« ge¬ 
nannt, also die Überprüfung 
der Funktionsargumente auf ih¬ 
ren richtigen Typ. Damit werden 
bei der Programmierung viele 
Fehler schon im voraus aufge¬ 
deckt. 


Der Lattice-Code 


Auch bei Lattice ließe sich die¬ 
ses 

MOVE.W 

01.00000002(A4), 

DO 

EXT.L 

DO 

MOVE.W 

01.00000004(A4), 

Dl 

EXT.L 

Dl 

ADD.L 

Dl,DO 

MOVE.W 

01.00000000(A4), 

Dl 

EXT.L 

Dl 

JSR 

_CXM33 (PC) 

MOVE.W 

D0,01.00000000 

(A4) 

EXT.L 

DO 

MOVE.L 

D0,-(A7) 

JSR 

_func(PC} 

ADDQ.W 

#4,A7 

durch einen besseren Code er¬ 
setzen: 

MOVE.W 

01.00000002(A4), 

DO 

ADD.W 

01.00000004(a4), 

DO 

MOVE.W 

01.00000000(A4), 

Dl 

MULS.W 

DO,Dl 

MOVE.W 

01,01.00000000 

(A4) 

MOVE.W 

D1,-(A7) 

JSR 

„func(PC) 

ADDQ.W 

#2,A7 


Bild 4. ...während Lattices 
».w« nur Vorteile mit sich bringt 
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DHRYSTONE-Benchmark 1.1 

Optionen 

Codelänge Recheneinheiten 

Erklärung 

Aztec 3.6a +L 

7416 Byte 632 dhry/sec 

32-Bit-lnteger 

Lattice 5.0 keine 

8748 Byte 746 dhry/sec 

32-Bit-lnteger 

Lattice 5.0 -0 

8612 Byte 941 dhry/sec 

mit Global 
Optimizer 

Lattice 5,0 -0 -v 

8240 Byte 1041 dhry/sec 

ohne Stack- 
checking 


Tabelle 1. Lattice C macht als Sprinter die bessere Figur 


Zu guter Letzt gibt es noch 
Funktionen, bei denen ver¬ 
schiedene Typen zurückgege¬ 
ben werden können. Beispieis- 
weise könnte OpenLibraryO ei¬ 
nen Pointer auf IntuitionBase, 
auf GfxBase, auf DosBase etc. 
liefern, so daß tatsächlich nur 
noch der Cast-Operator einer 
Warnung zu entrinnen hilft. 

Es bleibt festzuhalten, daß 
bei Lattice ein lausiger Pro¬ 
grammierstil schwieriger auf¬ 
rechtzuerhalten ist als bei Az- 
tec. Es wird ganz klar der ANSI- 
Standard unterstützt, Fehler¬ 
meldungen bei Lattice können 
bei Aztec eventuell nur als War¬ 
nung quittiert werden. Das ist 
für den C-Anfänger vorteilhaft, 
wenn es darum geht, die Spra¬ 
che wirklich nach den Richtli¬ 
nien von Kernighan & Richie zu 
lernen und hilft letztendlich, 
Fehler zu vermeiden. Äußerst 
positiv macht sich bei Lattice 
auch bemerkbar, daß man hin¬ 
sichtlich eines optimalen Codes 
auf nicht benutzte Variablen 
oder auf nicht initialisierte Auto¬ 
variablen (das sind lokale oder 
Register-Variablen, die nicht 
automatisch initialisiert wer¬ 
den, sondern zufällige Werte 
beinhalten können) hingewie¬ 
sen wird. 

Geschwindigkeit 
ist IVumpf 

Für die meisten Programmie¬ 
rer am interessantesten ist die 
Frage nach der Ablaufge¬ 
schwindigkeit eines fertig com- 
pilierten Programmes. Objekti¬ 
ve Benchmarks zu finden ist im¬ 
mer problematisch. Wir haben 
dazu ein bekanntes Bench¬ 
mark-Programm namens 
»DHRYSTONE« gewählt. Es te¬ 
stet beide Compiler in verschie¬ 
dener Hinsicht und vermittelt ei¬ 
nen weitgehend objektiven Ein¬ 
druck. Es werden zu 53 Prozent 
Zuweisungen, zu 32 Prozent 
Kontrollanweisungen und zu 15 
Prozent Funktionsaufrufe un¬ 
tersucht (siehe Tabelle 1). Viele 
»dhry/sec« bedeuten dabei ein 
besseres Compilationsergeb¬ 
nis. 

Zwar bietet Lattice 5.0 Funk¬ 
tionen an, mit deren Hilfe sich 
der Code noch weiter optimie¬ 
ren ließe, aber ein Geschwin¬ 
digkeitsvorteil gegenüber Aztec 
Ist auch ohne diese klar ersicht¬ 
lich. Hierzu zählen der «Global 
Optimizer« der beim Lattice 
überflüssige Anweisungen eli¬ 
miniert. Normalerweise führt 
lattice auch eine Stack- 
Überlaufkontrolle durch, die 
das Programm etwas verlang¬ 
samt, jedoch mit der »-v«- 
Option abgeschaltet werden 


kann. Das erspart je nach An¬ 
zahl von benutzten Funktionen 
auch eine Menge Speicher¬ 
platz. Diese Option sollte aller¬ 
dings erst benutzt werden, 
wenn das Programm ausgiebig 
auf Fehler überprüft wurde. Bei 
Aztec finden keine derartigen 
Überprüfungen während der 
Laufzeit statt. 

Üblicherweise werden in C 
die Parameter eines Funktions¬ 
aufrufs einfach auf den Stack 
gelegt und dann die passende 
Funktion aufgerufen. Sämtli¬ 
che Amiga-spezifische Funktio¬ 
nen verlangen die Argumente 
aber in Registern, so daß eine 
große Library mit entsprechen¬ 
den Interface-Routinen not¬ 
wendig ist, die die Verbindung 
zwischen Parameterübergabe 
auf dem Stack und den Regi- 


Heiko 

Schlichting 



sammelte seine ersten Com¬ 
putererfahrungen 1984 mit ei¬ 
nem PET 2001 und später mit 
einem C64. Bereits nach rela¬ 
tiv kurzer Zeit wuchs der 
Wunsch nach einem Compu¬ 
ter, der bessere Grafikfähigkei¬ 
ten mitbringt und in Hochspra¬ 
chen programmiert werden 
kann. Der Amiga 2000 war für 
beides prädestiniert. 

Heiko Schiichting studiert 
Biochemie an der Freien Uni¬ 
versität Berlin. 

Ersammeite intensive Erfah¬ 
rungen mit der Sprache C auf 
einer Unix-Anlage. dem PC und 
mit Hilfe des Lattice-C auf dem 
Amiga. Dessen neueste Version 
testete er für diesen Artikel. 


Stern übernimmt. Das wirkt sich 
natürlich negativ auf die Lauf¬ 
zeit des Programmes aus, da 
zusätzliches Umladen von 
Speicher- und Registerinhalten 
notwendig ist. 

Bei Lattice wird dies vom 
Compiler umgangen, indem 
die Argumente direkt in die Re¬ 
gister geladen werden. Der fer¬ 
tige Programmcode erweckt 
fast den Eindruck, in Assembler 
geschrieben zu sein und es 
kann beim Linken sogar auf die 
«Amiga.lib« verzichtet werden, 
wobei dann nur noch wenige 
Sekunden Linkzeit in Anspruch 
genommen werden! Vor allem 
Anhänger von rechenintensi¬ 
ven Anwendungen wie Compu¬ 
tergrafik werden bei solchen 

Geschwindigkeitsvorteilen 
doch eher mit Lattice liebäu¬ 
geln (siehe Bild 5). Lediglich bei 
einer sehr langen Parameterli¬ 
ste muß noch der Umweg über 
den Stack genommen werden, 
da selbst der Amiga nur 16 Re¬ 
gister besitzt. 

»Make« macht’s 
bequemer 

Wer mit längeren Program¬ 
mierprojekten beschäftigt ist, 
der wird die Hilfe des von Unix 
abgekupferten Make-Utilities 
zu schätzen wissen. Mat hat so 
die Möglichkeit, mittels eines 
einzigen Befehls, -• »make« bei 
Aztec oder »Imk« bei Lattice - 
das Compilieren, Assemblie- 
ren, Linken und eventuelle Auf¬ 
räumarbeiten (»CleanUp«) au¬ 
tomatisch erledigen zu lassen. 
Dazu stehen in einem selbst ge¬ 
schriebenen »makefile« die ge¬ 
nauen Instruktionen, die von 
»make« ähnlich einem Batch- 
File interpretiert werden. Ein 
besonderer Vorteil besteht dar¬ 
in, daß ein aus mehreren Modu¬ 
len bestehendes Programm 
nicht vollends neu compiliert 
werden muß, wenn nur ein Teil 
des Quelltextes geändert wur¬ 
de. »Make« realisiert dies, in¬ 
dem die letzte Zugriffszeit der 
Objekt-Files mit der des C- 
Quelltextes verglichen wird. Ist 
das C-File jüngeren Datums, 
dann ist das Objektmodui nicht 
mehr »up to date« und wird neu 


compiliert. Zur korrekten Ar¬ 
beitsweise muß natürlich immer 
die aktuelle Uhrzeit vorhanden 
sein. 

Weiterhin wird so die Tastatur 
geschont, denn »make« erspart 
das wiederholte Eintippen von 
langen Compiieraufrufen. Es 
scheint in der PD-Scene offen¬ 
sichtlich schon üblich zu sein, 
zu jedem Source-Code ein ent¬ 
sprechendes »makefile« zu lie¬ 
fern -zur Freude eines jeden C- 
Programmierers, der sich dann 
nicht weiter um die Compilerop¬ 
tionen kümmern muß. Das»ma- 
ke«-Utility ist auf jeden Fall bei 
beiden Compilern eine sehr 
empfehlenswerte Hilfe. 

Der Editor 

Ein Editor ist zum Schreiben 
eines C-Quellcodes unerläß¬ 
lich. Beide Compiler haben ei¬ 
nen Editor bereits im Lieferum¬ 
fang enthalten. Diese unter¬ 
scheiden sich allerdings stark 
in der Leistungsfähigkeit. Der 
Editor, der bei Aztec mitgliefert 
wird (genannt »Z«), ist dem 
Unix-Editor »vi« sehr ähnlich. 
Die Bedienung des Editors ist 
demnach auch in keiner Weise 
auf das Betriebssystem des 
Amiga zugeschnitten. Das 
macht die Bedienung kompli¬ 
ziert und erscheint unnötig um¬ 
ständlich. Die gesamte Lei¬ 
stung des »Z« übersteigt die des 
»ED« nicht deutlich, wenn man 
auch eine sehr schöne Mög¬ 
lichkeit geschaffen hat, Funk¬ 
tionen zu suchen. Wenn mit 
dem mitgeliefertem Utility 
(»CTags«) eine Referenzliste er¬ 
stellt wurde, kann man mit ei¬ 
nem Befehl vom Funktionsauf¬ 
ruf zur Funktionsdefinition 
springen - sogar wenn die 
Funktion in einem anderen 
Textfiie definiert ist. 

Der Lattice-Editor »LSE« wur¬ 
de für die Version 5.0 deutlich 
verbessert und ist leichter zu 
bedienen als der »Z«. Viele 
Operationen sind über Menüs 
und Funktionstasten aufrufbar, 
für Mausanhänger und Tipp¬ 
faule ist das sicher von Vorteil. 
So können Compiler und Linker 
aus dem Editor mit einem Ta¬ 
stendruck gestartet werden, 
eventuelle Fehler werden dann 
im Editor angezeigt, wobei sich 
der Cursor schon an der Stelle 
befindet, an der der Fehler auf- 
tritt. 

Einen großen Nachteil haben 
jedoch beide Editoren: Sie er¬ 
lauben es nicht, Umlaute in den 
Quelitext einzufügen. Zwar 
kommen in der Syntax der 
Sprache C keine Umlaute vor, 
doch bei der Textausgabe und 
bei Kommentaren verzichtet 
man nur ungern darauf. Die 
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wohl ursprünglich als Elngabe- 
hllfe gedachte Beschränkung 
wird hier zur Qual. 

Viele Programmierer wollen 
sich für verschiedene Aufgaben 
nicht jedesmal an einen neuen 
Editor gewöhnen. Sie verwen¬ 
den nur einen, der an verschie¬ 
dene Gegebenheiten angepaßt 
werden kann. Auf Seite 8ff. in 
diesem Heft stellen wir einige 
leistungsfähige Editoren vor. 
Wer sich die Ausgaben für ei¬ 
nen teuren professionellen Edi¬ 
tor sparen möchte, findet auf 
der Fish-Disk 153 einen für C- 
Programmierer sehr gut geeig¬ 
neten Editor namens »DME«, 
Dieser erlaubt es sogar, seine 
Funktionsvielfalt durch eigene 
Befehle zu ergänzen. Die Bele¬ 
gung der Tasten kann komplett 
geändert werden und auch Me¬ 
nüs können nach eigenen Wün¬ 
schen aufgebaut oder ganz 
weggelassen werden. Viele Be¬ 
fehle des »DME« sind ganz be¬ 
sonders auf die Wünsche von 
Programmierern zugeschnit¬ 
ten; so ist es zum Beispiel mög¬ 
lich, eine Referenz zu Begriffen 
anzeigen zu lassen. Steht der 
Cursor auf dem Wort »Screen«, 
so läßt sich mit einem Tasten¬ 
druck ein weiteres Window er¬ 
zeugen. in dem die Screen- 
Struktur mit allen Flags ange¬ 
zeigt wird. Der »DME« unter¬ 
stützt außerdem auch die oben 

Es geht auch 
in Assembler 

erwähnte »CTags«-Funktion 
des Aztec-Compilers. Ein Auf¬ 
ruf von Compiler, Linker und 
»make«*Utility direkt aus dem 
Editor ist durch die hohe Flexi¬ 
bilitätebenfalls möglich. Dieser 
Public Domain-Editor eignet 
sich viel besser zur Programm¬ 
eingabe als die beiden bei den 
Compilern mitgelieferten. Be¬ 
sonders Aztec-Benutzer wer¬ 
den sich schnell nach einem 
leistungsfähigeren Editor Um¬ 
sehen. 

Beide Entwicklungssysteme 
stellen einen komfortablen Ma¬ 
kroassembler zur Verfügung, 
wobei nur der Aztec-Assembler 
grundsätzlich zur Erzeugung 
eines Objektfiles benötigt wird. 
Dies liegt daran, daß bei Aztec 
der C-Source mittels Compiler 
zunächst einmal in ein Assem- 
blerlisting übersetzt wird. Latti- 
ce erzeugt dagegen einen eige¬ 
nen Zwischencode, der von 
Pass 2 dann auf das Objektfor¬ 
mat gebracht wird. Dem Aztec- 
User bleibt so natürlich die 
Möglichkeit offen - sofern ent¬ 
sprechende Assemblerkennt¬ 
nisse vorhanden sind - nach¬ 
träglich Optimierungsarbeiten 
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Lattice verwen¬ 
det Register 


Der Funktionsaufruf 

Text(RastPort,text,len) ; 
erfolgt bei Lattice per Register¬ 
übergabe: 

MOVEA.L 01.00000000(A4), 
Al ;Rast- 

Port- 
Zeiger 
in al 

OVEA.L 01.00000008(A4), 
AO ;Zeiger 
auf Text in aO 
MOVE.L 01.00000004(A4), 
DO 5 Länge 

in dO 

MOVEA.L _GfxBase(A4), 

A6 ;GfxBase in 
a6 

JSR FFC4(A6) 

;und auf geht 's... 


Bild 5. Selbst in Assembler 
geht’s nicht besser 

durchzuführen, zumal man 
sich das Assembler-Listing mit 
der Option »-T<< auch noch über¬ 
sichtlich gestalten lassen kann. 
Hierbei wird der C-Sourcecode 
als Kommentar an die passen¬ 
de Stelle im Assembler-Listing 
eingefügt. Praktisch ist auch 
die Möglichkeit beim Aztec, 
zwischen den Präprozessor¬ 
anweisungen »#asm« und 
»#endasm« Assembleranwei¬ 
sungen sogar innerhalb des C- 
Quelltextes zuzulassen. 

Beide Assembler können als 
in sich abgeschlossen angese¬ 
hen werden, sie sind also auch 
bestens zur ausschließlichen 
Assemblerprogrammierung ge¬ 
eignet. Vor allem können die 
von Commodore gestellten 
Include-Files gelesen werden, 
die Teil des Lieferumfangs sind. 
In der Version 5.0 enthält das 
Lattice-Handbuch nun auch die 
nötigen Informationen zum As¬ 
sembler. 

Mehr Effektivität 
mit weniger 
Speicher? 

Im Zusammenhang mit den 
beiden Assemblern möchten 
wir näher auf die sogenannten 
Speichermodelle eingehen, die 
bei Aztec auch als »Small Co¬ 
de« oder »Large Code« bezie¬ 
hungsweise »Small Data« oder 
»Large Data« bezeichnet wer¬ 
den, was vielleicht nur für dieje¬ 
nigen von Bedeutung sein 
mag, die neben C auch in As¬ 
sembler programmieren. Aber 
auch für C-Freaks ist dies 
durchaus interessant. Norma¬ 


lerweise können Variablen im 
Speicher über ihre volle Lang¬ 
wortadresse angesprochen 
werden, wozu der Prozessor 
bei einem Zugriff erst einmal 
das entsprechende Langwort 
aus dem Speicher holen muß 
(»Large Data«). Eine entspre¬ 
chende Assembleranweisung 
könnte etwa so aussehen: 
»move.l $20bd50,d0« 

Dabei wird der Wert der Varia¬ 
blen in das Datenregister »dO« 
geladen. Um nun ein sowohl 
schnelleres als auch kompakte¬ 
res Programm zu erhalten, hat 
man sich für eine andere Me¬ 
thode entschieden: Sämtliche 
Programmdaten liegen in ei¬ 
nem einzigen Speicherblock, 
der nicht größer als 64 KByte 
sein darf. So wird nur ein Zeiger 
auf diesen Block benötigt, bei 
einem Zugriff auf Daten ist nur 
noch eine 16-Bit-Referenz nötig 
(16 Bit entspricht dabei dem Zu¬ 
griffsraum von 64 KByte, des¬ 
wegen auch »Small Data«). 
Zwangsläufig muß der Zeiger 
dann ständig parat sein, der bei 
Aztec und Lattice automatisch 
in Adreßregister »a4« gelegt 
wird. Ein typischer Variablenzu¬ 
griff sieht so aus: 

»move.l ffe2(a4),d0« 

Dieser Befehl erzielt die glei¬ 
che Wirkung wie der oben ge¬ 
nannte. Beachten Sie bitte, daß 
der Zugriff auf Auto-Variablen in 
gleicher Weise realisiert wird, 
es wird lediglich Register »a5« 
(statt »a4«) in Beschlag genom¬ 
men. 

Ähnlich sieht es bei Aufrufen 
von Funktionen aus. Anstatt 
diese beispielsweise mit »jsr 
$202f60«, also »Large Code«, 
über ihre volle Adresse anzu¬ 
springen, benutzt man die PC¬ 
relative Adressierungsart, so 
daß bei »jsr 2afe(pc)« nur eine 
16-Bit-Referenz nötig ist. Dies 
wird allerdings uneffektiv bei 
Programmen, in denen die 16 
Bit nicht mehr ausreichen, da 
hier sogenannte Sprungtabel¬ 
len angelegt werden und meh¬ 
rere Sprünge nacheinander 
durchgeführt werden müßten. 
»Small Code« und »Small Data« 
sind nun auch bei Lattice Vor¬ 
einstellung, die erzeugte Code¬ 
länge wird dadurch schon sehr 
an die des Aztec angeglichen. 

Das »Small-Data«-Modell 
macht Probleme , wenn es dar¬ 
um geht, fremde Assemblerli- 
stings zu verwenden, wie zum 
Beispiel die des Seka-Assem- 
bler. Dieser unterstützt »Small 
Data« nicht automatisch, und 
dessen Programmierer haben 
demnach das Register »a4« zur 
freien Verfügung. Das hätte na¬ 
türlich unweigerlich Konse¬ 
quenzen, die aber sowohl bei 


Lattice als auch Aztec mit der 
Benutzung von »Large Data« 
verschwinden würden. 

Erwähnenswert bei Aztec ist 
die Möglichkeit, die verschiede¬ 
nen Speichermodelle auch in¬ 
nerhalb des Assemblerlistings 
wechseln zu können; es wer¬ 
den hier entsprechende Direkti¬ 
ven angeboten. 

Verbesserter 

BUnk 

inzwischen ist auch der Lin¬ 
ker von Lattice soweit verbes¬ 
sert worden, daß das Aztec- 
Pendant teilweise sogar über¬ 
troffen wird. So geht Blink in sei¬ 
nen Funktionen, die die Verän- 


Christian Woif 







ist Amiga-Freak der ersten 
Stunde. Der Amiga 1000 löste 
einen Atari 800XL ab, der zum 
Programmieren zu klein ge¬ 
worden war. Seit Beginn seiner 
Amiga-Karriere stützt er sich 
auf das Aztec-Entwicklungssy- 
Stern. 

Christian Wolf studiert Infor¬ 
matik an der Technischen Uni¬ 
versität in Berlin. Er testete den 
Aztec-C-Compiler für diesen 
Artikel 

Neben mehreren Program¬ 
men im 68000er-Magazin und 
den Amiga-Sonderheften hat 
er die Software für den »AL- 
COMP«-Soundsampler ent¬ 
wickelt. Er hat dabei den Aztec- 
C-Compiler bis in die letzten 
Feinheiten kennengelernt. 


derungen der Hunks des Out¬ 
put-Files beeinflussen, sogar 
so weit, daß die Größe des 
Code-Hunks einen selbst zu 
bestimmenden V/ert nicht über¬ 
schreiten darf. 

Als Folge dessen kann der 
Programmcode in mehreren 
Hunks untergebracht werden. 
Dies ist zum Beispiel sinnvoll, 
wenn das fertige Programm 
auch unter extremer Speicher¬ 
knappheit laufen soll, da der 
Programmcode dann auf kleine 
Speicherstücke verteilt werden 
kann. Aztec läßt hier leider nur 
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Bild 6. Reich an Funktionen präsentiert sich der Lattice 
Debugger 


eine konstante Größe von 8 
KByte zu. Allerdings ist der Ein¬ 
fluß auf dieses sogenannte 
»Amiga-Scatter-Load-Format« 
nur für wenige Programmierer 
von Interesse. 

Großen Fortschritt für den C* 
Programmierer stellen die 
Source-Level-Debugger dar. 
Beide Compiler bieten ein sol¬ 
ches Utility-Programm zu ihrer 
neuesten Version an. 

Ein Source-Level-Debugger 
ist ein Hilfsmittel, mit dem man 
den Ablauf eines C-Programms 
Anweisung für Anweisung ver¬ 
folgen kann. Dabei können 
auch Variablen per Namen aus¬ 
gegeben oder verändert wer¬ 
den. Um bei langen Program¬ 
men bestimmte Teile untersu¬ 
chen zu lassen, kann man so¬ 
genannte »Breakpoints« set¬ 
zen, an denen der Debugger in 
den Einzelschrittmodus um¬ 
schaltet. Wer mit der C-Syntax 
schon vertraut ist, wird sich 
freuen, daß die Debugger bei 
der Ausgabe der Variablen und 
bei deren Manipulationen dar¬ 
auf zurückgreifen. Veränderun¬ 
gen lassen sich während des 
Debuggings vornehmen, wie 
man es vom Programmieren 
gewohnt ist. Ein komfortabler 
Einblick in die Strukturen des 
Betriebssystems ist während 
des Programmablaufs dadurch 
möglich, daß Strukturen in ih¬ 
ren Komponenten per Namen 
angezeigt werden können. 

In ihrer Funktionsvielfalt un¬ 
terscheiden sich die Source-Le- 
vei-Debugger von Aztec und 
Lattice nur wenig, beide unter¬ 
stützen die Umschaltung von 
C-Sourcetext auf Assembler. 
Der Source-Level-Debugger 
von Lattice ist jedoch für den 
Anfänger leichter zu bedienen, 
da viele Befehle über Menüs 
und Funktionstasten ausge¬ 
führt werden können und nicht 
immer die Kommandos über 
Tastatur eingegeben werden 


müssen. Auch das Arbeiten mit 
mehreren Fenstern auf einem 
eigenen Screen (Bild 6) hat sich 
als praktisch und einfach her¬ 
ausgestellt. Bei Aztec hat man 
zum Teil Schwierigkeiten mit 
den Fenstern (Bild 7), da in dem 
Sourcetext-Fenster nicht hori¬ 
zontal gescrollt werden kann, 
so daß formatierte Texte unter 
Umständen nicht zu lesen sind. 
Der Speicherbedarf der beiden 
Programme ist so groß, daß 
sinnvolles Arbeiten erst ab ei¬ 
nem Megabyte Speicher mög¬ 
lich ist. Für die Fehlersuche in 
C-Programmen sind diese bei¬ 
den Utilities so hilfreich, daß 
man sie nach kurzer Zeit schon 
nicht mehr vermissen möchte. 
Wir können die beiden Source- 
Level-Debugger zur schnellen 
und komfortablen Fehlersuche 
aus eigener Erfahrung nur 
empfehlen. 

Nur bei Lattice 

Wir möchten hier noch auf 
einige Besonderheiten des 
Lattice 5.0 eingehen, die bei Az¬ 
tec nicht zu finden sind, wie 
zum Beispiel die sehr ausführ¬ 
lich dokumentierten Include- 
Files. Man findet zu fast allen 
Strukturen des Amiga-Be- 
triebssystems eine Erläuterung 
der Komponenten und der 
Flags, so daß nicht so oft zum 
Handbuch gegriffen werden 
muß. Hinsichtlich der Benut¬ 
zung des oben erwähnten 
Reference-Befehls im »DME«« 
ist dies eine noch größere Er¬ 
leichterung. 

Der Lattice Compiler verwen¬ 
det automatisch Prozessorregi¬ 
ster für Auto-Variablen, ohne 
daß dies explizit mit »register« 
angegeben werden muß. Es 
wurden zusätzliche Schlüssel¬ 
worte eingeführt, die den Be¬ 
dürfnissen der Amiga-Pro- 
grammierer Rechnung tragen. 
So ist es zum Beispiel möglich, 
ausgewählte globale Variablen 


schon im Quelltext mit dem 
Keywort »Chip« zu versehen 
und festzulegen, daß diese 
dann in den gleichnamigen 
Speicher gelegt werden. Dies 
ermöglicht (im Gegensatz zum 
Compilieren mit der »+c«- 
Option), die restlichen Varia¬ 
blen im Fastmemory zu belas¬ 
sen. 

Die Vielzahl von Library- 
Funktionen bei Lattice lassen 
beim Programmierer fast keine 
Wünsche mehr offen. Es finden 
sich viele von Unix, Xenix und 
natürlich vom ANSI-Standard 
bekannte Routinen. Es ist auch 
erfreulich, daß in den Libraries 
Funktionen implementiert wur¬ 
den, welche die neue Work- 
bench 1.3 nutzen, so daß unter 
anderem die Erstellung resi¬ 
denter Module oder die Ver¬ 
wendung von Environment-Va¬ 
riablen ermöglicht wird. Die 
Ausstattung des Aztec wirkt auf 
diesem Gebiet vergleichsweise 
spartanisch. 

Dementsprechend sind na¬ 
türlich auch Compiler und Lin¬ 
ker »resident«-fähig, was Besit¬ 
zer einer Speicherweiterung 
mit Aussicht auf schnellere 
Compilationszeiten sicher zu 
schätzen wissen. 

Der Lattice-Compiler hat in 
vielen Aspekten die Nase vorn. 
Dies heißt aber nicht, daß bis¬ 
herige Aztec-Freaks nun ihre 
gewohnte Programmierumge¬ 
bung aufgeben sollen. Mit die¬ 
ser war für Besitzer einer 
2-MByte-Erweiterung bisher 
schon ein schnelles und zuver¬ 
lässiges Arbeiten möglich. Was 
das Handbuch versprach, wur¬ 
de vom Compiler auch prompt 
gehalten. Für eine ähnlich kom¬ 
fortable Umgebung könnte bei 
Lattice nur eine Festplatte sor¬ 
gen, die die Ladezeiten ver¬ 
kürzt. Des weiteren ist das Ge¬ 
spann Aztec-C und Assembler 
für denjenigen zu empfehlen, 
bei dem Geschwindigkeitspro¬ 
bleme ohnehin in Maschinen¬ 


sprache gelöst werden, da ein 
optimales Zusammenspiel ga¬ 
rantiert ist. Wer dies erst einmal 
kennengelernt hat, möchte es 
so schnell nicht wieder missen. 
Auch ist der Aztec für den Gele¬ 
genheitsanwender mit gerin¬ 
gem Speicher und einem Lauf¬ 
werk die einzige Möglichkeit, in 
C zu programmieren. 

Lattice verfolgt ganz klar eine 
sehr professionelle Linie, und 
mit der neuesten Version 5.0 
werden dem Programmierer 
viele nützliche Hilfsmittel zur 
Verfügung gestellt. Es ist aller¬ 
dings eine sehr genaue Kennt¬ 
nis der Compileroptionen nötig, 
da sonst sehr leicht Abstürze 
erzeugt werden können. Nach 
unseren Erfahrungen ist eine 
gewisse Einarbeitungszeit nö¬ 
tig, bis man wirklich das ge¬ 
wünschte Resultat erhält. Da¬ 
nach erwies sich der Compiler 
jedoch als sehr zuverlässig, al¬ 
le bisher genannten Features 
konnten tatsächlich nachvollzo¬ 
gen werden. Es gibt zwar Anzei¬ 
chen dafür, daß noch ein paar 
kleine Bugs vorhanden sind, 
was jedoch keinen davon ab¬ 
halten sollte, sich für diesen fas¬ 
zinierenden Compiler zu ent¬ 
scheiden. 

Es gibt genügend Argumente 
sowohl für den einen wie auch 
für den anderen Compiler. Für 
welchen Sie sich entscheiden, 
ist zu einem großen Teil Ge¬ 
schmackssache. Denn auch 
wenn Lattice aus diesem Duell 
vorerst als Punktsieger hervor¬ 
geht, ist das Rennen noch lan¬ 
ge nicht gelaufen. Man darf ge¬ 
spannt sein auf den nächsten 
Lauf. (Christian Wolf/ 

Heiko Schlichting/so) 

Lattice-C S.0; Preis; ca. 600 Mark; Hersteller: 
Lattice Incorporated, 2500 S. Highland Ave¬ 
nue, Lombard IL 60146, USA 
Aztec-C 3.6a; Preis: ca. 600 Mark; Hersteller: 
Manx Software Systems Inc.. RO.Box 55. 
Shrewsbury, NJ 07701 

Beide C-Compller erhallen Sie beim Softwars¬ 
versand Phllgerma. Barerstr. 32, 8000 Mün¬ 
chen 2, Tel. 089/28122B oder Baroper Str. 337, 
4600 Dortmund, Tel. 0231/759292. 
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Bild 7. Aztecs Source-Level-Debugger in Action 
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Amiga Suparbas 0 (Bookwara) ' *' ™ 

Wegen seiner Bedienerfreundlichkeit die optimale Einsteiger-Datenbank. Per Mausklick 
Ihre Datenmaske. Aufnahme, Auswahl und Ausgabe der Daten erfolgen über ein Bediener^iä^^| 
dem eines Videorecorders sehr ähnlich ist. Selbstverständlich können Sie Amiga-Grafiken eben^^ 
walten und anzeigen lassen wie Zahlen und Texte - Briefmarkensammler zum Beispiel könnten som 
die digitalisierten Abbilder ihrer Schätze mit den zugehörigen Daten auf den Monitor bringen. Das | 
System ist relational; Sie können also Einträge verschiedener Datenbanken miteinander verknüpfen 
Die Daten lassen sich als Formular oder Liste auf dem Bildschirm oder Drucker ausgeben. Vorbitt 
also die Zeit des Chaos in Platten-, Dia- oder anderen Sortimenten! I 

Hardware-Anforderungen: Amiga 500,1000, 2000 mit mindestens 512 Kbyte Arbeitsspeicher., Jfl 
Lieferbar 2. Quartal 1989, ca. 192 Seiten, inkl. Programmdiskette. ' 

ISBN 3-89090-791-1. Bestell-Nr. 90791 Vi^ 




iupeiba a e 2 Amiga (dautach) 

Wegen seiner Verkaufszahlen der Renner unter den Datenbanken, für den Haus- 
gebrauch ebenso geeignet wie für das Büro. Daten und Bilder lassen sich mit diesem 
mächtigen, relationalen Datenbanksystem fast spielerisch verwalten. Eine neue Form der ^ 

Lagerhaltung ist somit beispielsweise möglich: Nicht mehr nur die Daten, sondern auch ein 
digitalisiertes Bild jedes Artikels erscheinen auf dem Monitor. Bis zu 16 Millionen Datensätze 
pro Datei und eine unbegrenzte Anzahl geöffneter Dateien sind erlaubt. Die Ein- oder Ausgabe erfolgt 
in Listen oder Formularen, die Sie sich am Bildschirm erstellen können. Weitere Leistungsmerkmeie: 
Textverarbeitungsprogramm integriert, Serienbrieffunktion, speicherbare Masken. Etikettendruck u.v.m 
Hardware-Anforderungen; Amiga 500, 1000, 2000 mit mind. 512 Kbyte RAM (empfohlen 1 Mbyte). 
Bestell-Nr. 54110 

Upgrade von Superbase 2 auf Superbase Professional. 51672U. DM 199.-* (sFr l79.-*/öS 1990.-*) 
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Supeibase Professional 

Neben den Funktionen von Superbase 2 bietet Ihnen diese Professional-Version zwei 
erhebliche Vorteile: zum einen den Formular-Editor, mit dem Sie sich grafische Ein- und 
Ausgabemasken in grandioser Qualität schaffen können, und zum anderen beinhaltet sie eine 
Programmiermöglichkeit. Die Programmiersprache DML ist zwar einfach erlernbar wie Basic, 
unterstützt die Möglichkeiten von Superbase jedoch vollständig. Somit sind der Flexibilität der 
Datenbank keine Grenzen gesetzt, sei es bei der individuellen Bedienung, sei es bei der Möglichkeit, 
Daten zu selektieren, darzustellen und auf dem Drucker auszugeben. 

Hardware-Anforderungen; Amiga 500,1000, 2000 mit mindestens 512 Kbyte RAM 
(empfohlen: 1 Mbyte RAM, Festplatte), Bestell-Nr. 51672 

Upgrade Superbase Professional auf Superbase Professional Entwickler-Paket gegen Einsendung der 
Originaldisketten kostenlosi 
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SupafbaM Profasslonal Entwlcklar-Pakat 

Superbase Professional Entwickler-Paket ist die konsequente Weiterentwicklung der 
herausragenden Datenbank Superbase Professional. Im Anwenderteil wurden die Tasta¬ 
turbedienung, die Einbaumöglichkeit von Hilfefenstern, die Import-ZExport-Funktion, der For¬ 
mulareditor u.v.m. erheblich erweitert. dBase, Lotus u.a. Dateien können nun komfortabel ein¬ 
gelesen werden. Ein leistungsstarkes DFÜ-Programm wurde integriert, um die Datenfernübertra¬ 
gung zu erleichtern. Für die Programmierer stehen nun weitere Befehle zur Verfügung, die zum 
Beispiel Transaktionen von Daten möglich machen. Das mitgetieferte Runtime-Modul ermöglicht es 
Entwicklern, ihre Anwendungen auch denen zugänglich zu machen, die das Superbase-Professlonal- 
Entwickler-Paket nicht besitzen. 

Hardware-Anforderungen: Amiga 500,1000, 2000 mit mindestens 512 Kbyte RAM (empfohlen; 1 Mbyte 
RAM, Festplatte). Lieferbar 2.Quartal 1989, Bestell-Nr. 54136 
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Quo vadis, 
Lattice? 


Lattice beschreitet mit »C++« völ¬ 
lig neue Wege. Diese Pro¬ 
grammiersprache wird unter Insidern 
bereits als Nachfolger für »C« ge¬ 
handelt. Wir verraten Ihnen, ob das wirklich 
schon der Anfang vom Ende der C-Ära ist. 


S eit einiger Zeit ist die 
objekt-orientierte Pro¬ 
grammierung ihren 
»Lispelnden« Kinderschuhen 
entwachsen. Immer mehr mo¬ 
derne Programmiersprachen 
weisen entsprechende Fähig¬ 
keiten auf. Was anfangs nach 
einem Spielzeug für die Pionie¬ 
re der Künstlichen Intelligenz 
aussah, hat sich inzwischen zu 
einem ernstzunehmenden Fak¬ 
tor herauskristallisiert. Lattice 
hat die Zeichen der Zeit erkannt 
und kämpft mit »C++« (Bild 1} 
stellvertretend für die »sCene« 
um den Anschluß. Doch worum 
handelt es sich bei dieser neu¬ 
en Sprache? 

C++ wurde in den Bell Labo¬ 
ratories von AT&T in Los Ange¬ 
les entwickelt. Dabei stand der 
Wunsch Pate, Schwächen von 
C auszumerzen und die Spra¬ 
che um die Möglichkeiten der 
objektorientierten Programmie¬ 
rung zu erweitern. Die volle 
Kompatibilität zu C sollte unbe¬ 
dingt gewahrt bleiben. Denn 
mit der immer größer werden¬ 
den Popularität von C ist eine 
große Anzahl von Bibliotheken 
entstanden, von denen ein gro¬ 
ßer Teil als nahezu perfekt an¬ 
gesehen werden kann. Als Um¬ 
steiger kann man sich daher so¬ 
fort auf die neuen Eigenheiten 
konzentrieren, so daß dieser 
Sprache praktisch die besten 
Voraussetzungen in die Wiege 
gelegt wurden. 

C++ erinnert in vielem an 
die Hochsprachen Modulaoder 
Pascal. Wer diese Sprachen 
kennt, wird folgende Punkte 
sehr zu schätzen wissen: 

- Es ist wie in Pascal möglich, 
mit der »const«-Anweisung 
Konstanten zu definieren. Die 
»#define« Anweisung ist bei¬ 
nahe überflüssig. Sie ist aller¬ 
dings aus Kompatibilitätsgrün¬ 
den weiterhin enthalten. 

- Es gibt den neuen 
Operator, mit dessen Hilfe man 
auf gleichnamige Variablen 


auch innerhalb von geschach¬ 
telten Blöcken zugreifen kann. 
Auf diese Weise könnte eine 
globale Variable angesprochen 
werden, die in der gerade aus¬ 
geführten Funktion aber dem¬ 
selben Namen existiert. 

- Das Funktions-Prototyping ist 
Standard geworden und erlaubt 
die genaue Überprüfung der 
Funktionsargumente. 

- Es lassen sich sogenannte 
Adreß-Variablen vereinbaren, 
die, nachdem ihnen eine Varia¬ 
ble zugewiesen wurde, bei Zu¬ 
griff diese verändern. Damit ist 
es bei Anwendungen nicht 
mehr notwendig, mit Zeigern 
auf Objekte zu arbeiten, obwohl 
dies intern nach wie vor so ge- 
handhabt wird. 

In C++ wurden weiterge¬ 
hende Möglichkeiten geschaf¬ 
fen, komplexe Datentypen zu 
definieren. So kann sich der 
Programmierer sogenannte 
»Classes« aufbauen, die wie 
»Structures« aus verschiede¬ 
nen elementaren Komponen¬ 
ten bestehen. Hier wird aber 
peinlich genau zwischen dem 
»Private«- und dem »Public«-Teil 
der »dass« unterschieden, so 
daß gewisse Komponenten nur 
für interne Zwecke zugänglich 
sind. Dies ist hilfreich, weil sich 
in der Class auch Funktionen 
angeben lassen, die auf diese 


Komponenten angewandt wer¬ 
den können. 

C++ als 
Pre-Compiler 

Des weiteren ist es erlaubt, in 
den Classes den Operatoren 
(beispielsweise auch »+« oder 
»-«) eine neue Funktion zuzu¬ 
ordnen, so daß zu den geschaf¬ 
fenen Objekten eine eigene 
Arithmetik aufgebaut werden 
kann. Sie können sicher erah¬ 
nen, welch faszinierende Mög¬ 
lichkeiten diese Sprache bietet. 

Wie wir schon gesehen ha¬ 
ben,istC++ nichts anderes als 
eine Erweiterung für die Spra¬ 
che C. Konsequenterweise lie¬ 
fert Lattice seinen C-Compiler 
in der Version 4.01 mit Blink 7.0 
und einem C++ Pre-Compiler, 
der den »C++«-Source in ein C- 
Programm übersetzt. Wer den 
Lattice C-Compiler besitzt, der 
erhält C++ auch günstiger als 
Zusatzpaket. Dadurch kann 
auch die neue Version 5.0 be¬ 
nutzt werden. Zum Lieferum¬ 
fang gehören zwei Disketten, 
die allerdings nur auf das Pro¬ 
grammieren in C++ zuge¬ 
schnitten sind. Es werden nur 
lnclude-FilesfürC++ geliefert; 
wer als C++-Käufer ein »nor¬ 
males« C-Programm compilie- 
ren möchte, dem fehlen die C- 


Includes des Standard-Com¬ 
pilers. 

C++ besteht aus drei weite¬ 
ren Programmteilen; Einem 
Steuerprogramm, das wie »LC« 
die Steuerung der Compilation 
übernimmt und die zwei Über¬ 
setzer aufruft, die ihrerseits ein 
etwas unübersichtliches C-Li- 
sting erzeugen. So würde etwa 
das vier Zeilen lange »helio.cp« 
in ein 314zeiliges »_hello.c« 
übersetzt werden. Danach wer¬ 
den wie gewohnt »Icl« und »lc2« 
aufgerufen, wahlweise kann 
das Linken ohne neuen Aufruf 
erledigt werden. Dazu ist auch 
eine zusätzliche Library na¬ 
mens »cplus.lib« nötig, alle wei¬ 
teren Libraries dürften dem Lat- 
tice-C-Anwender bekannt sein. 

Das erste Handbuch, das die 
Bedienung des Compilers er¬ 
läutert, erinnert stark an sein C- 
Äquivalent. Für den Umsteiger 
gibt es wenig Neues, da der 
größte Einfluß auf das Compilat 
über den C-Compiler genom¬ 
men werden kann. Wesentlich 
interessanter ist das Handbuch 
zur Programmiersprache 
selbst. Da C++ weithin unbe¬ 
kannt ist, hat man sich ent¬ 
schlossen, dem C++-Neuling 
eine ausführliche Sprachbe- 
schreibung auf den Weg zu ge¬ 
ben. Da dieses Handbuch spe¬ 
ziell das objektorientierte Pro¬ 
grammieren in C++ behan¬ 
delt, sind Kenntnisse über C 
zum Verständnis erforderlich. 
Für den Umsteiger erübrigt sich 
so die Anschaffung weiterer Li¬ 
teratur. 

Der Pre-Compiler des C+ + 
schlägt mit etwa 300 KByte zu 
Buche und vergrößert so den 
Speicherbedarf drastisch. Im 
Sinne einer erträglichen Com- 
pilationszeit stimmen wir den 
im Handbuch genannten Min¬ 
destanforderungen von 1,5 
MByte Speicher und einer Fest¬ 
platte zu,C++ Ist damit nur we¬ 
nigen Vorbehalten. 

Ob sich diese Sprache zur 
professionellen Programment¬ 
wicklung durchsetzen wird, läßt 
sich noch nicht beurteilen. Eini¬ 
ge aufgetretene Mängel lassen 
hier Zweifel aufkommen. So ist 
beispielsweise das Pre-Compi- 
ler-Konzept sicher nicht gerade 
zukunftsträchtig. Mit Sicherheit 
ist C++ für denjenigen von In¬ 
teresse, der einen Einblick In 
die objektorientierte Program¬ 
mierung bekommen möchte. In 
diesem Fall bietet sich ein faszi¬ 
nierendes Experimentierfeld - 
schade ist nur, daß der Preis 
von fast 800 Mark für den 
Durchschnittsanwender hoch 
ist. (Christian Wolf/so) 

Lattice C+-t- ist zum Preis von ca. 600 Mark er¬ 
hältlich hei Philgerma. Barerstr. 28,8000 Mün¬ 
chen, Tel. 089/281228 
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l^RGLEICHSTEST 

Assembler 
im Wettbewerb 

Für den Amiga gibt es inzwischen sehr ieistungsfähige 
Assembler. Die Vor- und Nachteiie der 
wichtigsten haben wir gründlich untersucht. Lesen Sie, 
was Devpac, Profimat und Co. zu bieten haben. 


D as Herz des Amiga ist 
der Mikroprozessor mit 
der Bezeichnung 68000. 
Die Vorteile dieses Prozessors 
sind Schnelligkeit und ein gro¬ 
ßer Befehlsvorrat. Wenn Sie 
dem Amiga Beine machen wol¬ 
len, ist die Programmierung in 
Maschinensprache der richtige 
Weg. Da alle Mikroprozessoren 
jedoch nur die logischen Zu¬ 
stände »Strom fließt« und 
»Strom fließt nicht« kennen, 
müssen alle Befehle aus den 
Zahlen 1 und 0 bestehen. Nun 
gibt es tatsächlich Programmie¬ 
rer, die Ketten aus diesen Wer¬ 
ten »lesen« und auch verste¬ 
hen. Aber auch diese Gehirn¬ 
akrobaten arbeiten natürlich 
mit einem geeigneten Werk¬ 
zeug, dem Assembler. Dieser 
übersetzt Befehle, zum Beispiel 
»RTS« (ReTurn from Subrouti¬ 
ne), in eine dem Prozessor ver¬ 
ständliche Form. 

Für den Amiga werden inzwi¬ 
schen verschiedene Assembler 
angeboten. Diese unterschei¬ 
den sich beispielsweise im 
Komfort bei der Eingabe der 
Programme, in der gebotenen 
Hilfeleistung bei der Fehlersu¬ 
che und in der Klarheit der 
Handbücher. Wir haben folgen¬ 
de Kandidaten getestet: 

- A68K (Fish-Disk 110) 

- CAPE68k (Version 2.0) 

- Devpac Assembler (Vers. 2.0) 
- Profimat 
- Seka 

Auf eine Bewertung mit ei¬ 
nem entsprechenden Kasten, 
wie Sie es vielleicht vom AMI- 
GA-Magazin gewohnt sind, ha¬ 
ben wir verzichtet. Vielmehr als 
auf die pure Qualitätskontrolle 
kam es uns darauf an, heraus¬ 
zustellen, für wen ein bestimm¬ 
ter Assembler die derzeit beste 
Lösung ist. 

Der Purist 

Das Handbuch vermittelt den 
ersten Eindruck vom Seka-As- 
sembler. Diesem Produkt der 
Firma Kuma liegt eine engli¬ 
sche Anleitung bei, die man 
wohlwollend mit »schön über¬ 
sichtlich« bezeichnen kann. Auf 
weitschweifende Ausführun¬ 
gen wurde jedenfalls verzichtet. 
Die Seka-Neulinge werden eini¬ 
ge Zeit benötigen, die im Hand¬ 
buch angedeuteten Funktionen 
effektiv einzusetzen. 

Auch bei anderen Merkma¬ 
len erweist sich der Veteran un¬ 
ter den Amiga-Assemblern als 
recht eigenwillig. Das Konzept 
ist grundlegend unterschiedlich 
zu seinen Ifenkurrenten. 

Das verhältnismäßig kleine 
Programm beinhaltet Editor, As¬ 
sembler und Linker. Der Editor 
enthält die wichtigsten Funktio¬ 


nen für die Erstellung eines 
Quellprogramms und ist beim 
Scrollen von Texten nicht gera¬ 
de der Schnellste. 

Dafür dauert der Assemblie- 
rungsvorgang nur sehr kurze 
Zeit. Sel^ holt sich den Quell¬ 
code aus dem Speicher, er¬ 
zeugt je nach gewählter Ar¬ 
beitsweise Link- oder Maschi¬ 
nencode und legt diesen auch 
wieder im Speicher ab. Assem- 
blieren von oder auf die Disket¬ 
te ist nicht vorgesehen. Die 
Codepuffer können dann als 
ausführbares Programm oder 
Linkmodule auf Diskette ge¬ 
speichert werden. Mit dem Be¬ 
fehl H (How Big) lassen sich 
Größe und Adresse der verwen¬ 
deten Speicherbereiche auf 
dem Bildschirm ausgeben. Er¬ 
zeugter Linkcode kann in einen 
speziellen Linkpuffer kopiert 
werden. 

Ist dieser Puffer nicht leer, so 
wird der Inhalt mit dem bei wei¬ 
teren Assemblierungen erzeug¬ 
ten Code verkettet. Mit Hilfe des 
integrierten Debuggers läßt 
sich das Programm starten und 
mit ähnlichen Funktionen wie 
beim Devpac (siehe unten) auf 
Fehler untersuchen. Einfacher 
geht es wirklich nicht. 

Trotz der einfachen Bedie¬ 
nung fallen auch dunkle Schat¬ 
ten auf den Assembler. So ak¬ 
zeptiert Seka den Befehl »MO- 
VEA« nicht und weist die Adres¬ 
sierung des Bedingungscode¬ 
registers mit »CCR« zurück. Bei 
der Gestaltung der Assembler¬ 
direktiven (EQU,ORG und an¬ 
dere) hielt man sich nicht wie 
die Konkurrenten an den Moto- 
rola-Standard. Eine Anpassung 
fremder Programme ist damit 
notwendig. 

Ein weiterer schwerwiegen¬ 
der Nachteil für die professio¬ 
nelle Programmierung ist die 
fehlende Möglichkeit zur Ein¬ 
bindung von Quelltexten wäh¬ 
rend der Assemblierung. Die 
anderen Assembler kennen 
hierfür die Anweisung »INCLU- 
DE Filename«. Auf deren Dis¬ 
ketten findet man auch eine 
Reihe Include-Files. In diesen 


Files werden hauptsächlich 
den Routinen und Variablen 
des Betriebssystems - und das 
sind nicht wenig - symbolische 
Namen gegeben. Assembler¬ 
programme, die auf das Be¬ 
triebssystem zurückgreifen, 
sind so wesentlich einfacher zu 
programmieren. 

Komfort 
mit Makros 

Alle vorgestellten Kandidaten 
sind Makroassembler. Makros 
sind durch »Name MACRO« 
und »ENDM« eingeschlossene 
Textzeilen im Quellprogramm. 
Taucht bei einer Übersetzung 
nach der Definition des Makros 
dessen Name im Quelltext auf, 
so ersetzt der Assembler den 
Namen durch die entsprechen¬ 
den Textzeilen. Das Makro INC 
im folgenden Beispiel simuliert 
einen Inkrementbefehl: 

INC: raacro j Definition 
ADDQ #1,\1 

ENDM 

INC DO ; Aufruf 

Der Assembler setzt beim 
Aufruf an die mit <\> und ei¬ 
ner Ziffer gekennzeichneten 
Stellen den entsprechenden 
Parameter ein. 

Eine leistungsfähige Makro¬ 
verwaltung ist eine unschätzba¬ 
re Hilfe für den Programmierer. 
Es lassen sich damit Befehlsfoi- 
gen aufbauen, die ähnlich kom¬ 
fortabel sind wie Funktionsauf¬ 
rufe in höheren Programmier¬ 
sprachen. Beispiel: 

MOVEWINDOW: macro 
move.l \l,aO 
raove.l \2,d0 
move.l \3>dl 
move.l IntuitionBase,a6 
jsr _MoveWindow(a6) 
endm 

Nach der Definition des Ma¬ 
kros wird dann mit der Anwei¬ 
sung »MOVEWINDQW Window, 
# 10, # 10« ein Intuition-Fenster 
um jeweils zehn Punkte nach 
rechts und nach unten verscho¬ 
ben. Das einmalige Definieren 


eines Makros entlastet fortan 
den Programmierer von der 
Überlegung, in welchem der 
Register die Parameter der Be¬ 
triebssystemroutinen stehen 
müssen. Während sich der 
Amiga unter Umständen bis 
zum nächsten Reset verab¬ 
schiedet, wenn Seka innerhalb 
des aufgerufenen Makros ei¬ 
nen weiteren Aufruf findet, kön¬ 
nen seine Konkurrenten Ma¬ 
kros verschachteln. 

Mit der bedingten Assemblie¬ 
rung ist es möglich, den er¬ 
zeugten Code ohne Änderung 
des Quellprogramms zu variie¬ 
ren. Eine Anwendung dafür ist 
das Einfügen von Debugging- 
Hilfen bei Testversionen; 

Uprol; 

IFNE DEBUG 

lea Text,aO j 

Jsr StringOut 
; Text ausgeben 
ENDC 

rts ; Ende von Uprol 
IFNE DEBUG 
Text: dc.b "Bin im 
Upro Eins",0 
ENDC 

Der Pseudo-Opcode (Pseu¬ 
do-Operationscode - kein 
echter 68000-Operationscode) 
»IFNE« überprüft den Wert des 
Symbols DEBUG. Ist dieser un¬ 
gleich Null, werden die Zeilen 
bis »ENDC« übersetzt. Eine sol¬ 
che Technik kann sinnvoll sein, 
um bei auftretenden Fehlern 
den Programmablauf am Bild¬ 
schirm zu verfolgen. Funktio¬ 
niert das Programm einwand¬ 
frei, so wird durch Setzen von 
DEBUG auf Null die Debug¬ 
ginghilfe nicht mehr assem- 
bliert. 

Während Seka praktisch nur 
die Pseudo-Ops IFEQ und IFNE 
kennt, arbeiten die anderen 
Testkandidaten auch hier nach 
dem Motorola-Standard, der als 
Parameter für »IF« fast alle Be¬ 
dingungen vorsieht, die auch 
der 68000 in seinen Branchbe- 
fehlen verwendet. 
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Bild 1. Die einzelnen Module des Profimat-Assemblers sind 
natürlich auch im Multitasking-Betrieb lauffähig 


Der Seka-Assembler ist we¬ 
gen der einfachen Bedienung 
sehr gut für kurze Programme 
oder erste Kontakte mit Prozes¬ 
sor und Betriebssystem geeig¬ 
net. Ohne große Wartezeiten 
kann man mit diesem Werk¬ 
zeug am Objekt lernen. Sobald 
man sich mit dem Amiga bes¬ 
ser auskennt und größere Pro¬ 
jekte in Maschinensprache rea¬ 
lisieren will, ist der Umstieg auf 
einen leistungsfähigeren Kon¬ 
kurrenten unvermeidlich. 

Profi-Assembler 

Der »Profimat« von Data 
Becker ist ein kompaktes Ent¬ 
wicklungssystem, das dem As¬ 
semblerprogrammierer einen 
übersichtlichen Aufbau und 
leichte Bedienung verspricht. 
Der Lieferumfang des Paketes 
enthält neben einer Diskette ein 
über 140 Seiten umfassendes 
Handbuch, das durch eine aus¬ 
gezeichnete Struktur über¬ 
zeugt. Es führt den Leser zu Be¬ 
ginn in den allgemeinen Um¬ 
gang mit Assemblern ein und 
beschreibt anschließend die Ar¬ 
beitsweise des Profimat. 

Nach Kenntnisnahme der In¬ 
stallationshinweise und Anmer¬ 
kungen zur Bedienung der Be¬ 


nutzeroberfläche ist der Leser 
sehr schnell in der Lage, sein 
erstes Maschinensprachepro¬ 
gramm einzugeben und auszu¬ 
probieren. Durch dieses erste 
Erfolgserlebnis motiviert, wird 
der engagierte Assembler-Fan 
das Buch gar nicht mehr aus 
der Hand legen. 

Der Hauptteil der Dokumen¬ 
tation beinhaltet die Funktions¬ 
beschreibung aller Menüpunk¬ 


te und Befehle mit detaillierten 
Erklärungen und Beispielaus¬ 
drucken. Zusätzliche Kapitel 
weisen in die Bedienung von 
Editor und Debugger ein. Eine 
Übersicht der verwendbaren 
Kommandos, der Assembler¬ 
befehle und Fehlermeldungen 
rundet die Dokumentation ab. 

Das eigentliche Programm 
besteht aus den vier Modulen 
Editor, Assembler, Debugger 
und Reassembler (Bild 1). Ein 
Editor ist im Prinzip eine »abge¬ 
speckte« Textverarbeitung. Ein¬ 
fache Funktionen (Tabelle 1) er¬ 
möglichen das Erstellen (oder 
Editieren) eines sogenannten 
Quellprogramms. Der Profimat- 
Editor wird bis auf kleine Aus¬ 
nahmen durch Pull-Down-Me- 
nüs bedient und paßt sich somit 
dem Erscheinungsbild an, das 
sich auch schon bei anderen 
Amiga-Programmen bewährt 
hat. Die maximale Breite einer 
Zeile beträgt 127 Zeichen. Dies 
reicht in der Regel vollkommen 
aus. 

Die Leistung 
überzeugt 

Der Programmierer kann 
nach der Fertigstellung des 
Queiltextes durch Wahl des ent¬ 
sprechenden Menüpunktes 
das Programm assemblieren 
und starten. Der Profimat ver¬ 
steht den vollen Motorola-68000- 
Befehlssatz und erlaubt auch 
Alternativbefehle wie beispiels¬ 
weise XOR und AND statt EOR 
und ANDI (Tabelle 2). Eine Rei¬ 
he von Assemblerdirektiven 
(Pseudo-Opcodes) vereinfacht 
die Programmentwicklung (Ta¬ 
belle 3). 

So ist eine Include-Anwei- 
sung für das Einbinden von öf¬ 
ter verwendeten Variablendefi¬ 
nitionen oder Programmteilen 


vorhanden. Im Gegensatz zum 
Seka-Assembler von Kuma ent¬ 
hält der Profimat die Include- 
Dateien mit den Struktur- und 
Symboldefinitionen für das 
Amiga-Betriebssystem. Kon¬ 
trollstrukturen wie REPEAT... 
UNTIL erleichtern die wieder¬ 
holte Assemblierung einzelner 
Programmteile. Die bedingte 
Assemblierung mit IF, IFD, 
IFND erlaubt eine Modifizie¬ 
rung des Maschinencodes 
durch Angabe bestimrnter Pa¬ 
rameter beim Start der Überset¬ 
zung. Damit kann zum Beispiel 
derselbe Quellcode auf ver¬ 
schiedene Computer angepaßt 
werden, Mit der Definition von 
Makros lassen sich spezielle 
Befehlsfolgen nur durch die An¬ 
gabe des Makronamens in den 
Quelltext einfügen. Mit SLA- 
BEL kann der Programmierer 
sich eine Bibliothek mit Symbo¬ 
len aniegen, die dann durch 
ILABEL in weiteren Program¬ 
men verfügbar gemacht wer¬ 
den können. Der Profimat un¬ 
terstützt außerdem lokale und 
redefinierbare Variablendefini¬ 
tionen. 

Sämtliche Zeichen im Na¬ 
men der Labels sind signifikant. 
Wer einmal längere Zeit einen 
Programmfehler gesucht _ und 
als Ursache letztlich eine Über¬ 
einstimmung der signifikanten 
Stellen unterschiedlicher 
Sprungmarken erkannt hat, 
weiß dies zu schätzen. 

Beim Assemblieren eines 
Textes stellt der Profimat ein 
reichhaltiges Potential an Funk¬ 
tionen zur Verfügung, die sogar 
die Ausgabe einer übersichtli¬ 
chen Cross-Reference-Tabelle 
ermöglichen. Sehr positiv sind 
auch die sogenannten Hilfsta¬ 
bellen zu bewerten. In ihnen 
sind alle 68000'Befehle mit ih¬ 
ren zulässigen Adressierungs¬ 
arten und alle Betriebssystem- 
Routinen mit den zugehörigen 
Parametern abrufbar. 

Neben all diesen Pluspunk¬ 
ten wird das Leistungskonto 
des Profimat allerdings durch 
die recht langsame Assemblie¬ 
rung belastet. Unverständlich 
ist auch die fehlende Imple¬ 
mentierung der in anderen As¬ 
semblern verbreiteten Befehle 
EVEN und CNOR Dadurch 
wird die Übernahme von »frem¬ 
den« Quelltexten unnötig er¬ 
schwert. Das Handbuch gibt 
zwar Hinweise, wie man diese 
Befehle durch Makros selbst 
definieren kann, eine direkte 
Implementation wäre aber we¬ 
niger umständlich gewesen. 

Selbst wenn Sie kein Anfän¬ 
ger bei der Programmierung in 
Maschinensprache sind, müs¬ 
sen Sie den Begriff »Reassem¬ 
bler« nicht unbedingt kennen. 


Editier-Befehle des Profimat 

Blockbefehle 

BA 

markiere Blockanfang 

BC 

kopiere Block 

BE 

markiere Ende 

BH 

hebe Markierung auf 

BK 

lösche Block 

BM 

verschiebe Block 

BP 

füge Block ein 

BV 

zeige Block an 

BX 

schneide Block aus 

Cursorsteuerung | 

CL 

Cursor nach links 

CO 

Cursor nach oben 

CR 

Cursor nach rechts 

CU 

Cursor nach unten 

C(x.y) 

setze Cursor auf Position x,y 

CN 

Cursor an den Anfang der nächsten Zeile 

CV 

Cursor an den Anfang der vorherigen Zeile 

Löschen | 

LA 

lösche bis Zeilenanfang 

LE 

lösche bis Zeilenende 

LL 

lösche das Zeichen links vom Cursor 

LR 

lösche das Zeichen rechts vom Cursor 

LZ 

lösche Zeile 

I Tabulatorbefehle | 

TL 

Tabulator löschen 

TS 

Tabulator setzen 

Sonstige Befehle 

Z Zeichenkette Zeichenkette einfügen 

ZH Zeichenkette Zeichen hinter aktueller Zeile einfügen 

ZV Zeichenkette Zeichenkette vor momentaner Zeile einfügen 


Tabelle 1. Der Editor des Profimat wird durch Menü- und 
einfach zu erlernende Tastatur-Kommandos gesteuert 
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Profimat-Alternativen 

Motorola-Standard 

Alternative 

ADDA, ADDI 

ADD 

SUBA, SUBI 

SUB 

CMPA. CMPI 

CMP 

ANDI 

AND 

EORI, EOR 

XORi, XOR 

EOR 

XOR 

ORI 

OR 

MOVEA 

MOVE 


Tabelle 2. Der Profimat bietet bei den Befehlsnamen 
Alternativen zum Motorola-Standard 


Prinzipiell hat ein Reassembler 
dieselben Funktionen wie ein 
Disassembler; Er wandelt im 
Speicher befindliche Maschi¬ 
nencodes wieder in Assembler¬ 
sprache um. Während die Aus¬ 
gabe eines Disassemblers in 
der Regel nur für die Erzeu¬ 
gung von Assemblerlistings 
oder der Betrachtung kurzer 
Programmroutinen dient, kön¬ 
nen vom Reassembler erzeug¬ 
te Dateien wieder als Eingabe 
für den Assembler genutzt wer¬ 
den. Zu diesem Zweck wird für 
jede Adresse, auf die in irgend¬ 
einer Weise von den Befehlen 
des zu reassemblierenden Be¬ 
reichs zugegriffen wird, eine 


symbolische Bezeichnung ge¬ 
neriert. 

Der im Profimat integrierte 
Reassembler unterscheidet 
weitgehend zwischen Daten 
und Programmroutinen. Er er¬ 
kennt direkt angesprungene 
Unterroutinen, merkt sich de¬ 
ren Ende und erklärt alle nicht 
auf diese Weise durchlaufenen 
Schritte als Daten. Indirekt an¬ 
gesprungene Befehle können 
so natürlich nicht als Programm 
erfaßt werden, 

Der Debugger kann durch 
seinen geringen Leistungsum¬ 
fang nicht überzeugen. So hilft 
er dem Anwender zwar, die be¬ 
liebten Guru-Meditation-Fehler- 


Pseudo-Opcodes 

Assemblerbefehi 

Bedeutung 

ALiGN.x 

Sicherstellen, daß die nachfolgenden 
Befehle an geraden Adressen stehen 

BSS 

Beginn eines Block-Storage- 
Segments 

CODE 

Beginn eines Code-Segments 

DATA 

Beginn des Daten-Segments 

DC.x 

Datendefinition von Daten 
beziehungsweise Werten, die als 
Konstanten im Speicher abgelegt 
werden 

DS.x n[,Füllwert] 

Reservierung eines Speicher¬ 
bereichs der Länge »n« und dem 

Inhalt »Füllwert« 

END 

Obligatorischer Abschluß des 
Quelltextes 

Name; Wert oder 

Dem Symbol »Name« wird ein Wert 

Name EQU Wert 

zugewiesen 

Name EQUR String 

Einem Symbol wird eine 

Zeichenkette zugewiesen 

IBYTES Dateil.Länge] 

Daten, die auf dem externen 
Massenspeicher vorliegen, werden 
an der Stelle, an der dieser Befehl 
steht, eingefügt 

IF; IFD; IFND 

Bedingte Assemblierung 

INCLUDE Datei 

Quelltextdatei einbinden 

INPUT [Meldung,] 

Die »INPUT«-Funktion hat dieselbe 

Variable 

Wirkung wie die normale Definition 
eines Speicherbereichs mit » = « 
oder »EQUR«, nur daß Sie den Wert 
während des Übersetzungsvorgangs 
festlegen können 

LIST; NOLIST: PAGE 

Druckerkommandos 

MACRO 

Makrodefinition 

ORG Adresse 

Startadresse des Programms 

REPEAT: UNTIL 

Wiederholte Assemblierung 

SLABEL; ILABEL 

Labelbibliotheksfunktionen 


Tabelle 3. Die Pseudo-Operanden des Profimat überzeugen 


meldungen abzufangen, ein 
angeschlossener Drucker läßt 
sich damit jedoch nicht aktivie¬ 
ren. Der Einzelschrittmodus 
und die 68020-Einzelschritt- 
Emulation funktionieren zufrie¬ 
denstellend. Ein Breakpoint 
kann allerdings nicht im ROM- 
Bereich positioniert werden. 

Trotz der wenigen Schwach¬ 
punkte erhält sowohl der inter¬ 
essierte Einsteiger als auch der 
professionelle Programmierer 
mit dem Profimat ein Werk¬ 
zeug, das mit einigen Funktio¬ 
nen konkurrenzlos ist. Der hohe 
Bedienungskomfort und die 
Funktionsvielfalt garantieren 
kurze Entwicklungszeiten für 
Assemblerprogramme. Die zahl¬ 
reichen Anpassungsmöglich¬ 
keiten erlauben auf eine Aufga¬ 


besserungen anbringen las¬ 
sen. Diese Firma ist bekannt für 
ihre einfallsreichen Program- 
mier-Tools. Als Beispiel sei 
PowerWindows (siehe auch 
Seite 101 angeführt, mit dem es 
ohne große Text-Tipperei mög¬ 
lich ist, Fenster- und Menü- 
Strukturen zu erstellen. 

CAPE bedeutet in der engli¬ 
schen Sprache »Umhang«<, und 
entsprechend ist dieses Paket 
auch aufgebaut. Um den As¬ 
sembler, wie er vielen bereits 
bekannt ist, wurde eine Schale 
gelegt, eine leicht zu bedienen¬ 
de und angenehme Benutzer¬ 
oberfläche. CAPE besteht ne¬ 
ben dem Assembler aus einem 
Editor und einer Einrichtung zur 
Unterstützung des EXEC-Mes- 
sage-Systems. Der Assembler 



Bild 2. Die Menüs der CAPE68k zeigen auch die Shortcuts 


be bestens zugeschnittene Pro¬ 
blemlösungen. Durch die Ma¬ 
krodefinitionen, die Unterstüt¬ 
zung der 68010-Befehle und die 
Angabe von lokalen und redefi- 
nierbaren Variablen ist der Pro¬ 
fimat auch für die Realisation 
von komplexen Programm¬ 
strukturen ideal geeignet. Der 
von vielen Data Becker-Produk¬ 
ten bekannte niedrige Preis ver¬ 
einfacht die Entscheidung für 
dieses Produkt, das sicher je¬ 
den Assembler-Profi überzeu¬ 
gen kann. 

Ein Umhang mit 
vielen Vorteilen 

Der Makro-Assembler von 
Metacomco ist eine der ältesten 
Programmiersprachen für den 
Amiga. Eine komfortable Be¬ 
nutzeroberfläche bietet der 
CAPE68K (Version 2.0), der zu 
dem Metacomco-Assembler 
voll kompatibel ist. 

Inovatronics zeigt mit ihrem 
»Complete Assembler Pro¬ 
gramming Environment« 
(CAPE), daß sich immer Ver¬ 


läßt sich über das sogenannte 
ARexx-lnterface durch einen 
externen Kommando-Interpre¬ 
ter steuern. 

Vielseitiger 

Editor 

Der Editor des Pakets (Bild 2) 
zeichnet sich durch zwei um- 
schaltbare Befehlstasten-Sätze 
aus. Entsprechend Ihrer Ge¬ 
wohnheit können Sie zwischen 
den Steuerlasten von Wordstar 
und denen von Micro-Emacs 
wählen, So müssen Sie sich 
nicht umgewöhnen, wenn Ih¬ 
nen die Arbeit mit einem dieser 
Programme vertraut ist. In bei¬ 
den Modi enthält der Editor alle 
nötigen Funktionen, wie zum 
nächsten Wort springen oder 
löschen bis zum Ende der Zeile. 

Der Assembler läßt sich aus 
dem Editor starten. Leider ist 
der Aufruf des Linkers von dort 
nicht vorgesehen. Zum Testen 
der Programme ist es noch not¬ 
wendig, ein CLI-Fenster geöff¬ 
net zu haben, aus dem der Lin¬ 
ker und das Programm aufge¬ 
rufen werden können. 
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CAPE bietet auch solche Ex¬ 
tras wie Funktionstasten-Bele- 
gung, die das Arbeiten mit ei¬ 
nem Editor zur Freude machen. 
Alle Funktionen sind auch über 
Menüs erreichbar. 

Der Assembler ist teilweise 
kompatibel zum Metacomco- 
und dem Devpac-Assembier. 
Während Devpac kleinere Un¬ 
genauigkeiten vergibt, legt 
CAPE Wert auf genaue Einhal¬ 
tung der Motorola-Syntax. Dev¬ 
pac wandelt ein »btst.w 
#10,Adresse« in ein «btst.b 
#2,Adresse« um, beide In¬ 
struktionen haben die gleiche 
Wirkung. Im Gegensatz zum 
Seka-Assembler unterstützt 
CAPE Inciude-Files. Eine weite¬ 
re Eigenschaft, die CAPE zu ei¬ 
nem interessanten Werkzeug 
macht: Das Programm springt 
nach jedem Fehler an die Stelle 
im Editor, an der dieser aufge¬ 
treten ist. 

Die interessanteste Neue¬ 
rung bei der Version 2.0 des 
CAPE ist sicherlich die Fähig¬ 
keit, das Programm während 
des Assemblierens zu optimie¬ 
ren. Bisher wurden nur Kleinig¬ 
keiten an Programmen verbes¬ 
sert. Sprünge wurden als 
»Short Branches« ausgewie¬ 
sen, wenn die Distanz es zuließ. 
CAPE geht in der Optimierung 
allerdings einige Schritte wei¬ 
ter, Wenn es möglich ist, wer¬ 
den die »Quick«-Versionen der 
Befehle eingesetzt. Dazu ver¬ 
wendet CAPE ein sogenanntes 
Trash-Register. Wenn im Pro¬ 
gramm der Befehl »add.l 
#120,d0« auftaucht, wandelt 
der Assembler das um in die 
Befehlsfolge »moveq.l #120, 
Trash-Register« und »add.l 
Trash-Register,d0«. Das spart 2 
Byte im fertigen Programm. Ein 
»add.l #0,d0« wird ganz aus 
dem Code gelöscht, da es so¬ 


wieso keine Konsequenzen für 
die Programmausführung hat. 

CAPE unterstützt bedingte 
Assemblierung. Dazu stehen 
neben den Standardfunktionen 
»IFEQ« und »IFNE« weitere nu¬ 
merische Vergleichsoperatoren 
zur Verfügung. »IFGE« fragt ab, 
ob der Ausdruck größer oder 
gleich Null ist, »IFLE« ist das 
Gegenstück. Mit »IFD« und 
»IDND« kann ermittelt werden, 
ob ein Label schon definiert 
wurde. »IFC« und »IFNC« ver¬ 
gleichen zwei Strings. Jedes 
bedingte Programmteil wird ab¬ 
geschlossen durch ein »ENDC« 
oder »ENDIF«, die bei CAPE sy¬ 
nonym zu verwenden sind. 

Die bedingte Assemblierung 
wird sehr hilfreich bei Verwen¬ 
dung mit Makros. CAPE stellt 
Befehle für Makros mit bis zu 
zehn Parametern und 8 KByte 
Länge zur Verfügung. Die Para¬ 
meterwerden übergeben durch 
»\1« bis »\0«. »\@« ist ein be¬ 
sonderer Operator in Makros. 
Für diese Zeichenfolge wird in 
jedem Makro eine andere Zahl 


eingesetzt. Das verhindert, daß 
Labels in Makros doppelt Vor¬ 
kommen. 

Seit einiger Zeit schon gibt es 
Programmierer-Teams, die 
durch gute Einfälle den Markt 
bestimmen. Viele dieser Pro¬ 
grammiererveröffentlichen ihre 
Ergebnisse in den Public Do¬ 
main-Reihen, so auch die »Soft¬ 
ware Destillery«. Von dieser 
Gruppe stammt der Linker 
»BLink«, der mit dem CAPE 
ausgeliefert wird. Dieser Linker 
versteht mehr »Kommandos«« 
als der Metacomco-Linker 
»ALink«. Speziell die SMALL- 
CODE-Option und die Alternati¬ 
ve, ob das Programm in den 
Chip- oder in den Fast-Speicher 
geladen werden soll, fehlen bei 
ALink. 

Mit CAPE ist es ebenso mög¬ 
lich, ausführbare Programme 
zu erstellen, ohne den Linker zu 
benutzen. Dazu muß der Befehl 
»EXEOBJ« in den Sourcecode 
eingefügt werden. CAPE spei¬ 
chert nun direkt ausführbare 
Programme ab. Viele Fähigkei¬ 
ten des Linkers lassen sich so 
nicht nutzen. EXEOBJ ist eher 
zum schnellen Ausprobieren 
von Programmteilen gedacht. 

Ein weiterer Standard, der 
sich wie BLink über die Public 
Domain etablieren konnte, ist 
der »ARexx«-Standard von Wil¬ 
liam Hawes. Zur Kommunika¬ 
tion verschiedener Programme 
miteinander ist ARexx gedacht. 
So kann ein Programm ent¬ 
wickelt werden, das CAPE von 
»außen« steuert. Alle Steuer¬ 
funktionen, die auch von der Ta¬ 
statur verwendet werden kön¬ 
nen, lassen sich durch ein Pro¬ 
gramm betätigen. CAPE liefert 
in diesem Falle keine Fehler¬ 
meldung auf dem Bildschirm, 
sondern sendet dem Komman¬ 
do-Interpreter einen Fehler¬ 
code. Der ARexx-Standard 
wird sicher fortgeschrittene 
Programmierer interessieren. 


Durch dieses Interface kön¬ 
nen Programme geschrieben 
werden, die CAPE um zusätzli¬ 
che Funktionen erweitern. Ein 
externes Programm könnte 
durch eine Funktionstaste dazu 
gebracht werden, das gerade 
vom Assembler produzierte File 
zu linken und auszuführen. 
Sehr viel mächtigere Funktio¬ 
nen sind vorstellbar. 

Das Paket CAPE wird mit 
einem englischsprachigen 
Handbuch ausgeliefert. Ob¬ 
wohl dieses Manual nicht als 
Lehrbuch für 68000er-Maschi- 
nensprache ausgelegt ist, fin¬ 
det sich hier noch einmal eine 
Übersicht der Assembler-Be¬ 
fehle. Die Editor-Steuertasten 
sind gut erklärt und übersicht¬ 
lich in Tabellen aufgeführt. Die 
Verwendung von Makros und 
der bedingten Assemblierung 
ist kommentiert und mit Bei¬ 
spielen illustriert. Auch das 
ARexx-lnterface ist gut doku¬ 
mentiert, so daß erfahrene Pro¬ 
grammierer ihre eigenen Kom¬ 
mando-Interpreter anhand der 
im Handbuch gebotenen Infor¬ 
mationen erstellen können. 

Wie dieser Assembler sich 
im Markt etabliert, hängt sicher 
auch davon ab, wie schnell Ino- 
vatronics einen interessanten 
Kommando-Interpreter nach¬ 
schiebt. Unser Eindruck von 
dem »alten« Assembler im neu¬ 
en Gewand ist einer der besten. 

Der PD- 
Assembler 

Das Bonbon auf der Fish- 
Disk 110 ist der Assembler 
A68K. Mit diesem Zwei-Pass- 
Assembler können Sie in Ver¬ 
bindung mit dem Linker »Blink« 
(ebenfalls auf der Diskette) ver¬ 
nünftig arbeiten. Alle Anwei¬ 
sungen sind auf der Diskette 
dokumentiert. Die wenigen 
Nachteile des Assemblers; 

- Fehlermeldungen lassen sich 
noch nicht auf eine Datei umlei¬ 
ten, sondern erscheinen auf 
dem Bildschirm. 

- Dateinamen im Include-Ver- 
zeichnis müssen durch Kom¬ 
mata getrennt werden. 

Alles halb so wild. Die Auf¬ 
zählung der Leistungsmerkma¬ 
le ist um einiges länger: 

- Sprungmarken können bis zu 
127 Byte lang sein. 

- Der Assembler erlaubt In- 
ciude-Dateien. 

- Sprung- und Move-Befehle 
werden optimiert. 

- A68K kennt Makros. 

- Sie haben Kontrolle über 
Fast- und Chip-RAM. 

Für geübte Programmierer 
ist der gesamte Quellcode von 
A68K interessant, der sich 
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Bild 4. Debuggen mit dem Devpac - finden Sie die Wanzen? 
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ebenfalls auf der Diskette befin¬ 
det. Was dem Assembler fehlt, 
ist die Amiga.lib und vorgefer¬ 
tigte Include-Dateien. 

Viele Listings lassen sich 
durch ein paar kleine Änderun¬ 
gen an den Assembler anpas¬ 
sen. Wir empfehJen diesen As¬ 
sembler daher jedem, der sich 
mit der Materie vertraut ma¬ 
chen möchte. Immerhin besit¬ 
zen Sie dann ein Werkzeug, um 
erste Schritte in Maschinen¬ 
sprache zu wagen. 

Das 

Komplettpaket: 
Devpac 2J0 

Der Devpac (Development 
Package) ist ein komplettes Ent¬ 
wicklungspaket. Es besteht aus 
Editor, Assembler, Linker und 
Debugger. Alle Funktionen kön¬ 
nen in der neuen Version 2.0 
vom Editor aus gesteuert wer¬ 
den. Zusätzlich gehört eine 
Stand-alone-Version des As¬ 
semblers zum Lieferumfang, 
die ohne Editor-Steuerung aus¬ 
kommt. Bild 3 zeigt die Menüs 
des Editors. Zu einigen existie¬ 
ren weitere Untermenüs. »Pro¬ 
gramm« ist der Teil, der alle 
Funktionen integriert. 


Der Editor ist über Shortcuts 
(Tastenkürzel) oder mit der 
Maus zu steuern. Er arbeitet 
sehr schnell und bietet hervor¬ 
ragende Leistungsmerkmale. 

Wenn Sie vom Editor aus den 
Menüpunkt »Assembler« aufru- 
fen, fällt ein wichtiger Punkt ins 
Auge: Es kann in den Speicher 
assembliert werden. Das Pro¬ 
gramm ist nun direkt ausführ¬ 
bar. Taucht bei einem Testlauf 
des Programms im Speicher 
ein Fehler auf, springt der Cur¬ 
sor im Editor in die fehlerhafte 
Zeile. Dieses ermöglicht 
schnelles und komfortables 
Entwickeln und Bearbeiten ei¬ 
nes Programms. Wichtige Be¬ 
dingung ist allerdings, daß In- 
clude-Files (die der Devpac 
selbstverständlich einiesen 
kann) von einer Festplatte oder 
besser aus der RAM-Disk gela¬ 
den werden. Ein gut ausgebau¬ 
ter Speicher und eine resetfeste 
RAM-Disk sollten also in jedem 
Fall vorhanden sein. 

Die SECTION-Anweisung 
des Devpac ermöglicht die Po¬ 
sitionierung von Daten entwe¬ 
der im Chip-Memory oder im 
Fast-Memory. Wie Sie vielleicht 
wissen, müssen beim Amiga 
Daten, die von den Custom- 
Chips verarbeitet werden sol¬ 
len, unbedingt im Chip-Memory 
liegen. 


Makros konnten schon in der 
Version 1.1 des Devpac beliebig 
tief verschachtelt sein und dür¬ 
fen sich auch selbst aufrufen 
(Rekursion). Neu ist in der Ver¬ 
sion 2.0, daß Devpac jetzt bis zu 
36 Parameter akzeptiert und 
Makroaufrufe sich über mehre¬ 
re Zeilen erstrecken können. 
Texte in spitzen Klammern kön¬ 
nen in der neuen Version Leer¬ 
zeichen enthalten. Lokale La¬ 
bels sind nun möglich, womit 
Makros besser lesbar und zu 
handhaben sind als mit der 
»n$«-Fbrm, die alternativ weiter¬ 
hin erlaubt bleibt. 

Mit MonAM 
auf Fehlersuche 

Der Assembler kann sofort 
ausführbaren Code erzeugen, 
es sind aber auch »linkbare« 
Module zu erstellen. Diese sind 
dann mit dem Linker »BLINK« 
mit anderen Modulen zu bin¬ 
den, auch Module von Hoch¬ 
sprachen sind mit dem Linker 
selbstverständlich einzubin¬ 
den. 

Der Assembler arbeitet nicht 
nur sehr schnell, er bietet auch 
einige echte Bonbons: 

- bedingtes Assemblieren, 

- Repeat-Schleifen, 


-Zugriff auf Assembler-Varia¬ 
blen, 

- Anweisungen zum einfachen 
Aufbau von Datenstrukturen. 

Ein leistungsfähiges Werk¬ 
zeug zur Fehlersuche bietet 
das Devpac-Paket mit dem De¬ 
bugger »MonAm«. Rufen Sie 
aus dem Editor heraus den 
Punkt »Debuggen« auf, er¬ 
scheint ein dreigeteiltes Ausga¬ 
befenster (Bild 4). In den drei 
Fenstern sind das Reassem- 
bler-Listing, alle Register und 
ein Speicherauszug in ASCII 
und hexadezimal dargestellt. 
Jedes der Fenster kann per Ta¬ 
stendruck auf volle Bildschirm¬ 
größe gezogen werden. Nun ist 
in Einzelschritten der Pro¬ 
grammablauf nachzuvollzie¬ 
hen, Unterprogramme können 
ignoriert werden, Breakpoints 
sind einfachzu setzen. Nützlich 
ist auch der History-Buffer, in 
dem die letzten fünf Schritte mit 
allen Registerwerten gespei¬ 
chert sind. 

Der Devpac 2.0 ist mit dem 
Profimat zusammen sicher die 
beste Alternative, wenn Sie in¬ 
tensiv Programme in Assem¬ 
bler entwickeln wollen. Ob sich 
der CAPE in Deutschland 
durchsetzen wird, ist fraglich. 

(Markus Zietlow/ 
Ingolf Krüger/ 
Michael Göckel/rs) 
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Programmi 


W ollen Sie mit die¬ 
ser anspruchsvollen 
Sprache Ihren Amiga 
programmieren? Dann ist die¬ 
ser Kurs genau richtig für Sie. 
Er richtet sich in erster Linie an 
alle C-Neuiinge, die gerne die 
Interna des Amiga kennenler¬ 
nen möchten. Danach schöp¬ 
fen Sie dessen so oft gerühmte 
Fähigkeiten noch besser aus. 

Wir werden im folgenden nur 
kurz auf allgemeine C-Grundla- 
gen eingehen und mehr Wert 
auf die Programmierung von 
Amiga-typischen Anwendun¬ 
gen legen. Umsteigern von an¬ 
deren Programmiersprachen 
kommt diese Vorgehensweise 
sehr entgegen. Wer allzu große 
Verständnisschwierigkeiten 
hat, sollte sich mit Hilfe eines 
Grundlagenbuchs zu C die nöti¬ 
gen Kenntnisse aneignen. Hin¬ 
weise zu geeigneter Literatur 
finden Sie auf Seite 147. Außer¬ 
dem war in der Ausgabe 11/87 
bis 4/88 des Amiga-Magazins 
ein C-Grundlagenkurs enthal¬ 
ten, Wer diese Hefte hat, findet 
dort eine kurze und verständli¬ 
che Einführung, die für diesen 
Kurs vollkommen ausreichend 
ist. 

Vorläufer der Programmier¬ 
sprache C, wie wir sie heute 
kennen, waren »BCPL« und 
später »B«. Anfang der 70er 
Jahre wurde die Sprache B von 
Dennis M. Ritchie und Brian W. 
Kernighan überarbeitet und er¬ 
weitert. Es entstand C, eine 
hardware- und betriebssystem¬ 
unabhängige Ck)mpilerspra- 
che. 

Compilersprache bedeutet, 
daß der Quellcode eines Pro¬ 
gramms vor dem ersten Start 
übersetzt werden muß - im Ge¬ 
gensatz zu Sprachen wie Ba¬ 
sic, die gewissermaßen »simul¬ 
tan« übersetzen (sogenannte 
Interpreter). 

Ibmpo mit klei¬ 
nem Befehlssatz 

Der C-Compiler ist - da der 
Sprachumfang von C relativ 
klein ist (siehe Tabelle 1) - sehr 
schnell, so daß Sie nicht allzu 
lange auf diese Übersetzung 
warten müssen. Beim Compi- 
lieren wird ein sehr kompakter 
Code erzeugt. Die Ausfüh¬ 
rungsgeschwindigkeit der Pro¬ 
gramme ist so hoch, daß selbst 


in zeitkritischen Fällen oft auf 
eine Programmierung in As¬ 
sembler verzichtet werden 
kann. 

C bietet allen Komfort einer 
Hochsprache, erlaubt aber 
gleichzeitig eine maschinenna¬ 
he Programmierung, wie zum 
Beispiel Bitmanipulationen. 
Darüber hinaus stehen dem 
Programmierer Itontrollstruktu- 
ren zur Verfügung, die struktu¬ 
riertes Programmieren unter¬ 
stützen. C ist eine universell 
einsetzbare Sprache, die sich 
sogar zur Entwicklung von Be¬ 
triebssystemen eignet. Ein gro¬ 
ßer Teil des Amiga-Betriebs- 
systems ist, neben BCPL, in C 
formuliert. Daher ist die Nut¬ 
zung der Systemroutinen - 
ganz anders als von Basic aus 
- besonders einfach. Nicht um¬ 
sonst bezeichnet man C als die 
»Muttersprache« des Amiga. 

Wir wollen uns einige dieser 
Routinen etwas genauer anse- 
hen. Das ganze Betriebssy¬ 
stem können wir natürlich nicht 
durchleuchten, auch ein noch 
so dickes Sonderheft würde da¬ 
für nicht genügend Platz bie¬ 
ten. Wir beschränken uns da¬ 
her auf wichtige Gebiete wie In¬ 
tuition, Grafik und AmigaDOS. 

Der Aufruf einer Systemrouti¬ 
ne setzt meist die Initialisierung 
einer oder mehrerer, eventuell 
recht komplizierter Strukturen 
voraus. Gerade diese Tatsache 
schreckt viele C-Anfänger ab, 
tiefer ins System vorzudringen. 
Um Ihnen den Einstieg in die¬ 
ses Gebiet zu erleichtern, ha¬ 
ben wir in einem speziellen 
»Headerfile« einige Routinen 
vordefiniert, die Ihnen die lästi¬ 
ge Initialisierung der entspre¬ 
chenden Strukturen abneh¬ 
men. 

Alle diese Routinen werden 
wir Stück für Stück erarbeiten, 
so daß uns gegen Ende des 
Kurses ein wertvolles Werk¬ 
zeug zur Verfügung steht: 
»Tool.h« (Listing 1). Falls Sie 
schon eine Tool.h-Version be- 


Viele Programmierer halten C für die inter¬ 
essanteste Sprache auf dem Amiga. Kein 
Wunder - bietet sie doch bei rasanter Ge¬ 
schwindigkeit allen Komfort einer Hoch¬ 
sprache. Zudem haben Sie leichten Zugriff 
auf die Betriebssystemroutinen. 


sitzen (beispielsweise von einer 
der Programmservice-Disket¬ 
ten): bitte Vorsicht! Wir verwen¬ 
den hier die Version 2.0, für die 
einiges geändert wurde, Am 
besten vergleichen Sie beide 
Listings, fügen die neuen Routi¬ 
nen ein und nehmen die ent¬ 
sprechenden Änderungen vor. 

Der folgende Kurs enthält 
viele Beispielprogramme. Die¬ 
se wurden mit dem Aztec C- 
Compiler 3.40a und 3.6a gete¬ 
stet, sollten sich aber auch pro¬ 
blemlos mit dem Lattice C- 
Compiler übersetzen lassen. 
Hierfür müssen Sie vor allem 
das Aztec-Includefile »func- 
tions.h« durch die Lattice-»Pro- 
totypes« ersetzen. 

Die Übersetzungsanweisun¬ 
gen lauten, wenn nicht aus¬ 


drücklich etwas anderes verein¬ 
bart ist; 

cc name.c -fL 
ln name.o -lc32 

Für »name« setzen Sie bitte 
jeweils den Namen des ent¬ 
sprechenden Programms ein. 

Alles auf einmal: 
Multitasking 

Es ist sicher von Vorteil, wenn 
Sie sich für diesen Kurs eine 
spezielle Diskette anlegen. Si¬ 
chern Sie dort alle Beispiele 
und schaffen Sie sich so 
ein recht umfangreiches »Un- 
terroutinen-Nachschlage(lade) 
werk«. 

Bevor wir mit den ersten Bei¬ 
spielen beginnen, sollten Sie 


Der Sprachschatz von C 


Schlüsselworte 

Bedeutung 

auto 

Speicherklasse, blockbezogen 

break 

Schleifenabbruch 

case 

Teil der switch-Anweisung 

continue 

nächste Wiederholung einer Schleife erzwingen 

char 

Datentyp »Zeichen« 

default 

Teil der switch-Anweisung 

do 

Schleife mit Prüfung nach Durchlauf 

double 

Variablentyp, doppelt genaue Gleitkommazahl 

eise 

leitet Alternativblock der if-Anweisung ein 

enum 

Datentyp, Aufzählungstyp 

extern 

Speicherklasse, globale Variable 

float 

Datentyp, Gleitkommazahl 

for 

Schleife mit Prüfung vor Durchlauf 

goto 

Sprunganweisung 

if 

Entscheidungsanweisung 

int 

Datentyp, ganze Zahl 

long 

Datentyp, erweiterte ganze Zahl 

register 

Speicherklasse wenn möglich in Register 

return 

Funktionsende, kann einen Wert zurückgeben 

short 

Datentyp, ganze Zahl 

sizeof 

liefert die Größe des Operanden 

static 

Speicherklasse, Lebensdauer über Blockgren¬ 
zen 

struct 

Datentyp, Struktur 

switch 

Anweisung zur Auswahl verschiedener Möglich¬ 
keiten 

typedef 

zur Definition eigener Datentypen 

Union 

Datentyp, Union 

void 

Typ einer Funktion ohne Returnwert 

while 

Schleife mit Prüfung vor Durchlauf 


Tabelle 1. Alle Schlüsselworte der Programmiersprache C. 
Diese Namen dürfen nicht für andere Zwecke verwendet 
werden. Sie haben in C eine feste Bedeutung. 
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eren mit C 


sich klar machen, in welcher 
Umgebung Sie programmieren 
und welche Regeln Sie einhal- 
ten müssen. 

Als Programmierer auf dem 
Amiga ist es nicht nur notwen¬ 
dig, sein eigenes Programm 
korrekt zu formulieren, man 
muß darüber hinaus darauf 
achten, daß dieses auch mit an¬ 
deren, eventuell gleichzeitig 
ablaufenden Programmen 
nicht in Konflikt gerät. Das Be¬ 
triebssystem des Amiga ist, wie 
Sie wissen, multitaskingfähig. 
Doch was bedeutet das? 

Multitasking ist - das Wort 
deutet es an - das gleichzeitige 
Abarbeiten mehrerer Aufgaben 
(»Tasks«), in unserem Fall meh¬ 
rerer Programme. Natürlich 
kann ein Computer, solange er 
mit nur einem Prozessor arbei¬ 
tet, immer nur ein Programm 
gleichzeitig bearbeiten. Ein 
Blick in das Gehäuse bestätigt; 
auch der Amiga verfügt nur 
über einen Prozessor, wenn 
auch über einen recht schnel¬ 
len »68000er« von Motorola. 

Überzeugender 

Simulant 

Daraus folgt, daß der Amiga 
nicht in der Lage ist, mehr als 
ein Programm gleichzeitig ab¬ 
zuarbeiten - er simuliert nur, 
wenn auch überzeugend. Das 
scheinbar gleichzeitige Abar¬ 
beiten wird erreicht, indem der 
Prozessor im schnellen Wech¬ 
sel nacheinander einen kleinen 
Teil jedes der anstehenden Pro¬ 
gramme bearbeitet. Die Verwal¬ 
tung aller Tasks übernimmt der 
Betriebssystemteil »Exec«. Im 
Normalfall erhält jeder Task die 
gleiche Menge an Rechenzeit, 
jedoch ist das Setzen von Prio¬ 
ritäten von -128 bis -1-127 er¬ 
laubt. Je höher die Priorität, de¬ 
sto mehr Rechenzeit erhält ein 
Task und umso schneller ist er 
daher abgearbeitet. 

Zwei Programme gleicher 
Priorität teilen sich also die Lei- 


Die Amiga-Libraries 

clist.library 

Funktionen zu Stringmanipulationen 

console.library 

Arbeiten mit der Tastatur 

diskfont.library 

Schriftarten auf der Workbench 

dos.library 

Disk Operating System 

exec.library 

der Kern des Betriebssystems 

expansion.Iibrary 

für Erweiterungen 

graphics.library 

Grafik, Copper, Blitter 

icon.Iibrary 

Verwaltung der Icons 

info.library 

Info Über File, Verzeichnis, Disk 

Intuition.library 

Benutzeroberfläche, Maus 

janus.library 

Verwendung des SideCar 

layers.library 

Arbeiten mit Layers (Grafikelement) 

mathffp.library 

Fast-Floating-Point Mathematik¬ 
bibliothek 

mathieeedoubbas.library 

Erweiterung von mathffp auf IEEE 
Standard 

mathtrans.iibrary 

Weitere Mathematikfunktionen 

potgo.iibrary 

Kontrolle von Joystick, Lightpen etc. 

timerlibrary 

Ansprechen der Software-Uhr 

translator.library 

englische Wörter in Phoneme 
wandeln 


Tabelle 2. Die wichtigsten Libraries des Betriebssystems und 
deren Aufgabenbereich 


stung des Prozessors. Es 
taucht die Frage nach dem Sinn 
des Ganzen auf, denn ganz of¬ 
fensichtlich laufen die Pro¬ 
gramme dann nur noch mit hal¬ 
ber Geschwindigkeit - oder? 

Die Anwort lautet »nein«. Die 
Erklärung klingt kurios: Die 
Haupttätigkeit eines Prozes¬ 
sors ist, so seltsam es auch er¬ 
scheinen mag, warten! Ständig 
wartet er mit rasanter Ge¬ 
schwindigkeit auf irgendwelche 
Ereignisse, zum Beispiel auf 
Bestätigung eines Requesters 
oder auf die Auswahl aus einem 
Menü, er wartet in Editoren 
oder Textprogrammen auf Ta¬ 
stendrücke (auch wenn der An¬ 
wender über noch so flinke Fin¬ 
ger verfügt), er wartet in Zei¬ 
chenprogrammen auf das 
Zeichnen des nächsten Punk¬ 
tes, erwartet beim Drucken auf 
die Mechanik des Druckers 
oder bei Laden und Speichern 
auf die Rückmeldung der Dis¬ 
kettenstation und, und, und-ei¬ 
ne Warteliste ohne Ende. 

Diese Wartezeit wird nun zur 


ter ein akzeptierbares Maß, 
Dies hat zwei Gründe: Zum ei¬ 
nen muß ein Task lange »anste¬ 
hen«, bis er weiterbearbeitet 
wird, zum andern erfordert die 
Verwaltung und insbesondere 
das Umschalten der Tasks (das 
sogenannte »Task-Switching«) 
ebenfalls Rechenzeit. 

Da man die Anzahl der Tasks 
zum Zeitpunkt des Programm¬ 
laufs niemals vorausbestim¬ 
men kann, ist zum Beispiel der 
Versuch, mittels einer Warte¬ 
schleife die Programmausfüh¬ 
rung um eine definierte Zeit zu 
verzögern, von vornherein zum 
Scheitern verurteilt! 

An dieser Stelle setzt man die 
»DelayO«- oder eine der 
»Waitü«-Funktionen ein (siehe 
unten), Diese Funktionen ver¬ 
setzen den Task in einen Warte¬ 
zustand. Tasks, die sich in die¬ 
sem Zustand (»Taskstate« ge¬ 
nannt) befinden, arbeitet der 
Prozessor so lange nicht ab, bis 
sie einen neuen Zustand (»rea¬ 
dy«) erhalten. Dies geschieht 
erst wieder nach dem Eintreten 


Erledigung anderer Aufgaben 
genutzt. Anstelle auf ein Ereig¬ 
nis zu warten, arbeitet der Pro¬ 
zessor andere Tasks ab. Die An¬ 
zahl der Tasks ist theoretisch 
nur vom vorhandenen Spei¬ 
cherplatz abhängig. 

Allerdings verlangsamt sich 
ab einer bestimmten Task- 
Anzahl die Ausführungszeit un¬ 


des erwarteten Ereignisses. 
Erst dann erhebt ihn Exec wie¬ 
der in die Reihe der auszufüh¬ 
renden Tasks. Nur der Task, 
den der Prozessor gerade bear¬ 
beitet, ist im »running« State. 
Das heißt für uns, Warteschlei¬ 
fen in dieser Form: 

for(i=0;i<100000;i++); 

wechseln ständig zwischen 
den Zuständen ready und run¬ 
ning, nutzen die Möglichkeit 
des Zustands waiting nicht. Sie 
belasten daher unnötig das ge¬ 
samte System, denn alle ande¬ 
ren Tasks müssen ja länger auf 
ihren nächsten running state 
warten. 

Machen Sie doch einmal den 
Versuch und testen Sie ein Li- 
sting mit Warteschleife, aber 
ohne die Wait()-Funktion, Star¬ 
ten Sie das Programm und ru¬ 
fen Sie dann einige CLI-Kom- 
mandos auf. Sie werden fest¬ 
stellen, daß jetzt deren Aus¬ 
führgeschwindigkeit merklich 
nachläßt. 

Belastung 
durch Schleifen 

Neben den drei Hauptzu¬ 
ständen waiting, ready und run¬ 
ning tenn sich ein Task noch in 
drei Übergangszuständen be¬ 
finden: Ein Task, der gerade in 
die »Warteschlange« eingereiht 
wird, ist vom State »added«, ab¬ 
gelaufene, aber gerade noch 
vorhandene Tasks vom State 
»removed« und solche, die sich 
in einem besonderem Zustand 
befinden, vom Taskstate »ex- 
ception«. 

Exception-Tasks kennen Sie 
sicher alle, es handelt sich hier¬ 
bei zum Beispiel um fehlerhafte 
Tasks, die eine hübsche Fehler¬ 
meldung, auch »Guru Medita¬ 
tion« genannt, nach sich zie¬ 
hen. Doch nun genug der lan¬ 
gen Vorrede, wir haben noch 
viel zu tun. 

Wie einfach ist doch die Ar¬ 
beit für den Amiga-Anwender: 
Ein Klick mit der Maus genügt, 
schon öffnet sich ein Fenster 
auf der Workbench, welches 
beispielsweise über den Inhalt 
eines Verzeichnisses infor¬ 
miert. Was in seiner »Kiste« da¬ 
bei vorgeht, interessiert ihn 
recht wenig. Für ihn ist die 
Hauptsache: Es funktioniert. 

Fortsetzung auf Seite 30 
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Programmname: Tool.h 


Computer: A500, A1000, A2000 mit Kickstart 1.2 


Sprache: C 


Compiler: Aztec 3.4 oder 3.6 


Aufrufe: Einbinden mit #include 


Programmautor; Amo GSlzer 



1 160 

#Include <intultlon/lntultlonbase.h> 

2 On 

#lnclude <llbrarle8/do8.h> 

3 f2 

#lnclude <graphlcs/gfxmaoros.h> 

4 Ky 

#lnclude <graphlos/sprlte.h> 

5 fJ 

# Include < devices/printer.h> 

6 DI 

# include <exec/memory.h> 

7 A4 

#include <exec/typea.h> 

8 iM 

# Include <functlon8.h> 

9 3Z 

#deflne ACTIVE_SCREEN ({etruct Screen *)(IntultionBa8e?Int 
ultionBase-> ActlveScreen:NULL)) 

10 FH 

#define ACTIVE_WINDOW ((atmet Window »)(IntultlonBa8e?Int 
ultlonBaae-> ActIveWlndow:NULL)) 

11 Za 

#define ClroFill(RP,col,x,y,r) EllFlll(RP,col,x,y,r,r) 

12 2i 

#define FreeFile(buffer,slze) FreeMem(buffer,size) 

13 WO 

#define TYPE (elntrag->flb_DlrEntryType) 

14 oS 

#define NAME (eintrag->flb_FlleName) 

15 Sb 

#deflne SI2E (eintrag->flb_Slze) 

16 Pd 

#define REQ 0 

17 9y 

#define DHREQ 1 

18 Oq 

#deflne DIRS 2 

19 B2 

#deflre FILES 4 

20 el 

Jiedeflne FLEN 31 

21 Cb 

struct IntuitlonBaae *IntuitlonBa8e=NULLj 

22 Sh 

struct GfxBase «GfxBa8e*NULL; 

23 U 

/• 

24 zl 

W Librarlea öffnen/sohlleßen 

25 Sr 

•/ 

26 Ng 

SHORT OpenLlbO 

27 d4 

(/* Libraries öffnen »/ 

28 lu4 

if{! (IntultlonBase»(8tmct IntuitlonBaae *) 

29 Hiii7 

OpenLibrary( 'Intuition.library",0))) return(l)j 

30 pg4 

if(I (GfxBase=(8tmct OfxBaae «) 

31 1R7 

OpenLibrBry(”graphlc8.1ibrary',0))) raturr(2); 

32 zu4 

retum(0)j 

33 X20 

1 

34 7R 

VOID CloseLibO 

35 CO 

[/* Libraries schließen */ 

36 N04 

if(GfxBase) Clo8eLlbrary(Gfx6a8e); 

37 5u 

38 o70 

IfdntultlonBaae) Clo8eLibrary(IntuitlonBa8e); 

) 

39 bO 

/» 

40 Zv 

\\ Intultien-Tools 

4l 17 

*/ 

42 2T 

atmet Screen »GetScreen(top,depth,mode8,title) 

43 Sv4 

SHORT top,depth; 

44 gO 

USHORT raodea; 

45 bB 

STRPTR title; 

46 oAO 

Screen öffnen »/ 

47 tj4 

atmet NewScreen nacr; 

48 TO 

neor.LeftEdge » 0; 

49 gT 

nscr.TopEdge = top; 

50 LG 

nscr.Width » 320*((niodes&HIRES)?2:l); 

51 il 

nacr.Helght . 256*((modes&UCE) ?2:1); 

52 ic 

naer.Depth » depth; 

53 ab 

nscr.DetailPen * 0; 

54 L3 

nacr.BlockPen = Ij 

55 19 

nacr.VlewModea : modes; 

56 TS 

nacr.Type » WBENCHSCREEN; 

57 zK 

nacr.Font » NULL; 

58 bA 

nacr.DefaultTitle « title; 

59 55 

nsor.Gadgeta * NULL; 

60 8G 

nscr.CuatomBltMap = NULL; 

61 4G 

62 OVO 

retum(0penScreen(&n8or)); 

1 

63 IT 

atmet Window »GetWindow{scr,left,top,width,height,idcmp,fl 
ags,title,gad) 

64 hk4 

atmet Screen *sor; 

65 Tw 

SHORT left,top,wldth,height; 

66 Lq 

ULONG ldcinp,flags; 

67 xX 

STRPTR title; 

68 Xw 

atmet Gadget *gad; 

69 BsO 

(/* Window öffnen »/ 

70 NP4 

atmet NewWindow nwin; 




71 Ve 

aor=scr?8cr:ACTIVE_SCREEN; 

72 Er 

nwin.LeftEdge = left; 

73 pL 

nwin.TopEdge = top; 

74 HY 

nwin.Width = wldth; 

75 kO 

nwin.Height = height; 

76 Iz 

nwin.DetailPen = -1; 

77 kO 

nwin.BlockPen = -1; 

78 tV 

nwin.IDCMPFlags * Idcmp; 

79 gD 

nwin.Flags = flags; 

80 44 

nwin.FirstGadget^ gad; 

81 ao 

nwin.CheckMark » NULL; 

62 6g 

nwin.Title « title; 

83 tT 

nwin.Screen = aer; 

84 WG 

nwln.BitMap = NÜU; 

85 9S 

nwin.MinWidth = 20; 

86 sQ 

nwin.MinHeight = 20; 

87 tl 

nwln.MaxWidth « (8cr->Wldth)-left; 

88 pR 

nwln.MaxHeight » (scr->Height)-top; 

89 RI 

nwin.Type » WBENCHSCREEN; 

90 cN 

91 TyO 

retum(OpenWlndow(&nwin)); 

1 

92 3T 

SHORT GetGadget(gad,WorG,left,top,wldth,height,f,act,type,g 
r,sr,text,info,ld) 

93 wL4 

atmet Gadget »gad; 

94 eu 

APTR WorG; /» atmet Window oder atmet Gadget */ 

95 qD 

atmet IntuiText »text; 

96 6r 

APTR gr,sr,lnfo; 

97 Mo 

SHORT left,top,width,helght,id; 

98 TN 

USHORT f,act,type; 

99 uGO 

(/» Gadget-Stmktur initialisieren und in Gadget-Liste einf 
gen •/ 

100 XE4 

SHORT nr; 

101 JA 

gad->NextGadget » (typeiREQGADGET)?{8tmct Gadget •) 

WorG:NULL; 

102 AY 

gad->LeftEdge * left; 

103 VI 

gad->TopEdge » top; 

104 ZI 

gad->Wldth » wldth; 

105 dC 

gad->Height = height; 

106 FW 

gad->Flags ■ f; 

107 Va 

gad->Aotlvatlon » act; 

108 Vv 

gad->GadgetType ■ type; 

109 Ih 

gad->GadgetRender » gr; 

110 rW 

gad->SeleotRender * er; 

111 7Q 

gad->GadgetText ■ text; 

112 GC 

gad->Mutual£xcludea NULL; 

113 21 

gad->SpecialInfo » Info; 

114 YM 

gad->GadgetID > id; 

115 el 

gad->U8erData ■ NULL; 

116 WJ 

If (typeiREQGADGET) retum(O); 

117 3e 

nr>>AddGadget(WorG,gad,-l); 

118 GT 

Refre8hGadget8(gad,WorG,NULL); 

119 P6 

retum(nr); 

120 wRO 

1 

121 fp 

VOID GetMenu((iien,Win,left,wldth, flags,tltel) 

122 oo4 

atmet Menu »men; 

123 C3 

stmet Window »win; 

124 8u 

SHORT left,wldth; 

125 4q 

USHORT flags; 

126 Xh 

BHE »tltel; 

127 h30 

{/* Menu-Struktur Initialisieren und ln die Menu-Liste einf 
gen »/ 

128 3o4 

inen->NextMenu = wln->HenuStrip; 

129 n2 

men->LeftEdge * left; 

130 up 

men->TopEdge = 0; 

131 Jg 

men->Width * wldth; 

132 cY 

men->Helght = 10; 

133 jq 

men->Flags * flags; 

134 OX 

men->MenuName e titel; 

135 4J 

men->FirstIteiii = NULL; 

136 rW 

win->MenuStrlp = men; 

137 DiO 

1 

138 s4 

VOID Getltem(inenu,item,left,top,wldth,height,flags,mutex,If 
ill,Sfm,com) 

139 zb4 

atmet Menu »menu; 

140 xd 

atmet Menultera »item; 

l4l hA 

SHORT left,top,width,height; 

142 L7 

USHORT flags; 

143 51 

LONG mutex; 

144 Nh 

APTR Ifill,Sflll; 

145 fb 

BYTE com; 

146 TqO 

[/» Menultem-Stmktur initialisieren und in die Item-Liste 
einfOgen »/ 

147 u34 

item-> Nextitem * = menu-> Flrstltem; 

148 Gt 

ltem->LeftEdge = left; 
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149 Tg iteiii->TopEdge = top; 

150 OQ lteni->V/idth = width; 

151 uG itein->Height = height; 

152 UO ltein->Flag3 = flagsj 

153 J5 ltem->MutualExclude= rautexj 

154 J6 ltein->IteniFill = Ifill; 

155 fiV itein->SeleotFill = Sfill; 

156 VX ltein->Coinniand = oom; 

157 E7 itein->SubIteni * NULL; 

158 Sb iiienU“>FirstItem = iteiti; 

159 Z40 i 

160 4lc VOID GetSlternJitem,eitern,leftjtop,width,height;flags,[nutex, 

Ifill,Smi,com) 

161 Iy4 struot Henultem »item; 

162 QE atruct Henultem »altem; 

163 3W SHORT left,top,width,helght; 

164 hT USHORT flags; 

165 R7 LONG mutex; 

166 J3 APTR Ifill,Sfill; 

167 Ix BYTE com; 

168 lwO {/* Subitem initialisieren und in die Subltem-Liste einföge 

n »/ 

169 KD4 8item->NextItem > item->SubItem; 

170 vl 8ltera->LeftEdge . left; 

171 ih sltem->TopEdge » top; 

172 Sy Hltem->Width ■ width; 

173 Iq 8lteni->Helght » height; 

174 Qo sitem->Flags > flags; 

175 71 altem->MutualExclude= mutex; 

176 8C 8ltem->IteDiFlll • Ifill; 

177 Xm altem->SelectFill . Sfill; 

178 Z5 sltem->Coimnand * com; 

179 9X aitem->SubItem » NULL; 

180 Tg item->SubItem * altem; 

181 vQO ) 

182 JF SHORT GetReque8t(req,wln,l,t,w,h,rl,rt,gad,rand,text,flags, 

bf,dm) 

183 3z4 struct Requester »req; 

184 B2 struot Window »win; 

185 uL SHORT l,t,w,h,rl,rt,dni; 

186 Rq struct Gadget »gad; 

187 J8 struct Border »rand; 

188 Li struct IntulText »text; 

189 68 USHORT flags; 

190 lA UBYTE bf; 

191 IMO [/» frei definierbares Requester installieren »/ 

192 Zy4 lnitReque8ter(req); 

193 M req->LeftEdge »1; 

194 ym req->TopEdge «t; 

195 fW req->Wldth =w; 

196 V2 req->Height =h; 

197 cd req->RelLeft -rl; 

198 tK req->RelTop »rt; 

199 et req->ReqGadgetsgad; 

200 gL req->ReqBorder»rand; 

201 HJ req->ReqText stext; 

202 ql req->Flag8 sflags; 

203 jZ req->BackFill »bf; 

204 sF if(dm==DMREQ) retum{SetDMReque8t(win,req)}; 

205 fa retum(Reque8t(req,win)); 

206 KpO j 

207 3G ULONG GetMessage(win,code,id,qual) 

206 ZQ4 atruct Window »win; 

209 Og USHORT »Code,»Id,«quäl; 

210 510 (/• HsgPort ausleaen; liefert GUSS,CODE,QUALIFIER der Msg 

und GadgetID »/ 


211 2ni4 

212 UX 

213 Ae 

214 2T8 

215 9H 

216 d3 

217 H7 

218 OW 

219 X24 

220 B6 

221 W28 

222 qf 

223 cQ 

224 c74 

225 vY 

226 e90 ) 

227 d2 /» 


struct IntuiMessage »msg; 

ULONG cla8S=0; 

if(m8g»{8truct IntuiHeesage »)GetHsg(wln->U8erPort)}{ 
class»m9g-> Claas; 
if(code) »code=m8g->Code; 

if(id} »id »(({atruct Gadget *)msg->IAddre8s)- 

>GadgetID); 

if(qual) »qual=nieg->Qualifier; 

ReplyMsg(msg); 

) 

elsef 

If(code) »code=0; 
ifÜd) »Id =0; 
if(qual) »qual=0; 

1 

return{cla9s); 


228 cn 

229 k9 

230 81 

231 Mb4 

232 J6 

233 OYO 

234 n04 

235 Jt 

236 Yw 

237 gs 

238 qLO 

239 16 

240 Wk4 

241 po 

242 vXO 

243 e94 

244 g4 

245 oO 

246 yTO 

247 9C 

248 e84 

249 re 

250 woO 

251 Jf4 

252 5g8 

253 IB 

254 fj 

255 7c4 

256 8d0 

257 Bb 

258 o24 

259 h5 

260 UoO 

261 Tp4 

262 xS8 

263 08 

264 G14 

265 HmO 

266 7H 

267 xB4 

268 U40 

269 W44 

270 MrO 

271 jf 

272 204 

273 a4 

274 hfO 

275 S44 

276 YC 

277 TyO 

278 Hu 

279 3U4 
260 Hq 
281 020 

282 Jp4 

283 PT 

284 fB 

285 xE 

286 TW 

287 Nf 
268 e90 

289 4A 

290 KY4 

291 70 

292 31 

293 WkO 

294 1M4 

295 hr 

296 5L 

297 ta 

298 oJO 

299 2T 

300 U14 

301 9Y 

302 n£0 

303 8 c 4 

304 65 

305 CS 

306 pt 


\\ Grafik-Tools 

»/ 

VOID Llne(RP, col, xl, yl, x2, y2) 
struct RastPort *RP; 

SHORT col, xl, yl, x2, y2; 

[/* Linie zeichnen */ 

SetDrHd(RP, JAM1); 

SetAPen(RP, col); 

Hove(RP,xl,yl); 

Draw(RP,x2,y2); 

) 

VOID ILine(RP, xl, yl, x2, y2) 
struct RastPort *RP; 

SHORT xl, yl, x2, y2; 

{/» Linie im JAHlI COMPLEMENT-Modus zeichnen »/ 
SetDrHd(RP, JAMll COMPLEMENT); 
Move(RP,xl,yl); 

Draw(RP,x2,y2); 

) 

VOID Blook{RP, col, xl, yl, x2, y2) 
struct RastPort »RP; 

SHORT col,xl,yl,x2,y2; 

(/* Block zeichnen »/ 

if(I((xl>x2) II {yl>y2)))( 

SetDrMd(RP, JAMl); 

SetAPen(RP, col); 

RectFilKRP, xl, yl, x2, y2); 


VOID IBlook{RP, xl, yl, x2, y2) 
struct RastPort »RP; 

SHORT xl,yl,x2,y2; 

(/* Block im JAHlICOMPLEMENT-Modus zeichnen */ 
if{l({xl>x2) II (yi>y2)))( 

SetDrMd{RP, JAMll COMPLEMENT); 
RectFilKRP, xl. yl. x2, y2); 


VOID IRa8t(RP) 

struct RastPort »RP; 

(/» RastPort im JAMll COMPLEMENT-Modus darstellen »/ 

IBlook(RP,0,0,RP->BitMap->BytesPerRow»8,RP->BitHap- 

>Rows); 

I 

VOID GetPo8(RP, x, y) 
struct RastPort »RP; 

SHORT »X, »y; 

(/» Position des Graflkcuraors im RastPort ermitteln »/ 
*x=RP->op_x; 

*y=RP->cp_y; 

j 

SHORT OetCol{VP,nr, r,g,b) 
struct ViewPort *VP; 

SHORT nr, »r,»g,*b; 

(/* Farbregister auslesen »/ 

SHORT ool; 

col« GetR0B4{VP->ColorMap,nr); 

*r » (col>>8)&15; 

»g » (col>>4)&15; 

»b » C01&15; 
retum(col); 

] 

VOID Print(RP, text, col, xpos, ypos) 
struct RastPort »RP; 

STRPTR text; 

SHORT col, xpos, ypos; 

(/» Ausgabe eines Textes »/ 

SetDrMd(RP, JAMl); 

SetAPen{RP, col); 

Move(RP, xpos, ypoa+RP->TxBaseline); 

Text(RP, text, 8trlen(text)); 

) 

SHORT E11F111(RP, ool, x, y, rh, rv) 
struct RastPort »RP; 

SHORT col, X, y, rh, rv; 

[/» ausgefüllte Ellipse in beliebiger Farbe zeichnen »/ 
struct TmpRas »Raster; 
struct Areainfo »Alnfo; 

PLANEPTR Bitplane; 

WORD Buffer[10]; 


Listing 1. Tool.h - unser Headerfile erleichtert Ihnen den 
Einstieg in die Systemprogrammierung des Amiga. 
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IX/SOI 


307 Ct 

BOOL error=l} 

308 Bu 

SHORT helght=3«rh,vrldth=3»rv; 

309 Ru 

lf((Bltplane=AllocRaster(wldth,helght))&8i 

310 ni7 

(Raater={struct TmpRas *)AllooMein(sizeof{struct TnpR 


as),MEMF_CLEAR))6& 

311 PF 

(AInfo=(struct Areainfo »)AllocHeiii(sizeof(8truGt Are 


aInfo),HEMF_CLEAR)))[ 

312 X6B 

SetAPen(RP,col); 

313 sd 

InitTinpRas(RaBter,Bitplane,RASSIZE(width,helght) 

314 SW 

RP-> TmpRas=Ra8ter; 

315 a5 

InitArea(AInfo,Buffer,2); 

316 HO 

RP-> AreaInfo=AInfo; 

317 OE 

error=AreaElllp8e(RP,x,y,rh,rv); 

318 2R 

AreaEnd(RP)j 

319 9e4 

) 

320 2v 

if(Alnfo) FreeMeni(AInfo,sizeof(struct Areainfo)); 

321 4E 

If(Raster) FreeMeni(RaBter,8lzeof(struet TmpRas)) j 

322 xB 

If(Bltplane) FreeRaster(Bltplane,width,helght)j 

323 aA 

return(error)j 

324 EJO 

] 

325 67 

BOOL HrdCpy{scr,left,top,wldth,height,size) 

326 vy4 

Btruot Soreen »scrj 

327 wi 

UWORD left,top,width,height; 

328 qn 

USHORT alzej 

329 uVO 

[/* Screen-RastPort ausdrucken »/ 

330 s74 

Union PrlO[ 

331 H68 

struet lOStdReq losj 

332 rd 

struct lODRPReq iodrpj 

333 St 

Btruot lOPrtCmdReq lopoj 

334 DT4 

]*reque8t,*CreateExtI0()j 

335 JN 

struet KsgPort »MPortj 

336 p3 

BOOL 0K«li 

337 nw 

3cr*8cr?scr:ACTIVE_SCREENj 

338 yh 

if( I (MPort=CreatePort( 'T00L_Port',0))) retum{l)} 

339 WS 

if(reque8t»(unlon PrlO *)CreateExtIO(MPort,8izeof(union 


PrI0)))[ 

340 bP8 

lf(l{OpenDevloe{'prlnter.devlce",0,request,0)))( 

341 uNC 

request- > lodrp. io_ComDiand«PRD_DUMPRPORTj 


342 L6 

request- > lodrp. io_RaBtPort=8taor-> RastPort; 

343 8D 

request->lodrp.io_ColorMap=scr->ViewPort.Colo 


rHap; 

344 SB 

request->lodrp.io_Mode8=scr-> ViewPort.Kodes; 

345 Dm 

request-> lodrp.io_SroX=left; 

346 la 

request-> lodrp.io_SreY=top; 

347 WX 

request-> lodrp. io_SroWldthstfldth; 

348 WA 

request->lodrp.io_SroHeight=heIght; 

349 FJ 

request->iodrp.io_DestCol8«{L0NG)(8lze*width)j 

350 6C 

request->lodrp.io_DeBtRows=(LONG)(8ize*height) 

351 Cq 

request-> lodrp. io_Speclal=SPECIAL_MILCOLSl 

352 tho 

SPECIALJtlLROWSl 

353 6k 

SPECIAI^PECT; 

354 9qC 

DoIO{request); 

355 g3 

Clo8eDeviee{request)j 

356 kF8 

1 

357 xB 

eise OK=0; 

358 dj 

DeleteExtI0(reque8t,8lzeof(unlon PrlO)); 

359 nl4 

I 

360 OE 

eise OK>0; 

361 2C 

DeletePort(MPort)j 

362 Bk 

return(0K}; 

363 rMO ! 


364 qF /» 


365 DE \\ 

DOS-Tools 

366 xM »/ 


367 AB LONG Exlsts(najne) 

368 6g4 

STRPTR nainej 

369 rrO (/* Existenz eines Eintrags feststellen */ 

370 gl4 

LONG bytessO; 

371 Pc 

struct FilelnfoBlock »elntrag; 

372 rü 

Btruot FlleLock «lock; 

373 SH 

lf{look»(8truct FlleLock »)Lock(&naine[0],ACCESS_READ)){ 

374 Ev8 

if(eintrag=(8truot FilelnfoBlock *} 

375 SQC 

AllocKem(slzeof(Btruct FilelnfoBlock),MEHF_CLEA 


R))l 

376 ul 

lf(Exanilne(lock,elntrag)) bytesa(TYPE>0) ? -1 


: SIZE; 
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Aktuelle Bücher und 


Bookwure für den Amign 


Atlantis IHckstudio A 
Wiewärees mit einem Stummnim-Slap- 
stick, einem Krimi oder einem Werbe¬ 
film für Ihr Schaufenster? Dazu Ihre 
Lteblingsmusik oder digitalisierte Stim¬ 
men? Mit einer ausführlichen Doku¬ 
mentation und dem Programm auf 
Diskette. 

1988.97 Selten, 
inkl. Programmdiskette 
Bestell-Nr. 9071S. ISBN 3-89090-719-6 
0M99.-* (sFr91.-*/öS842,-’) 


Atlantis AmigaCall 

Treten Sie ein in die faszinierende Welt 
der Datenfernübertragung. Kommuni¬ 
zieren Sie über Mailboxen mit erfahre¬ 
nen Computer-Anwendern, die Ihnen 
bei Ihren Problemen weiterhelfen 
können. Oder Sie erhalten auf diesem 
Wege leistungsfähige Public-Domain- 
Software. 

1988.135 Seiten, 
inkl. Programmdiskette 
Bestell-Nr. 90716. ISBN 3-89090-716-4 
OM99r‘ (sFr91r’/öS842,-‘) 


R.Arbinger/l. Krüger Scriptum 
Textverarbeilungssyslem: Pull-down- 
Menüs oder Tastatur, verschiedene Zei- 
chensäize, wählbare Textbreite, Ein- 
füge-/Überschrsib-Modus, Textjustie¬ 
rung, Blocksatz, Blockbearbeitung, 
Wordwrapping, Funktionstastenbele¬ 
gung, Kopf- und FuBzeilen definierbar, 
Seitennumerierung und vieles mehr. 
LIefeibar 1, Quartal 1989, 
ca. 200 Selten, inkl. Programmdiskette 
Bestell-Nr. 90650, ISBN 3-89090-650-8 
ca.DM79r’ (sFr72,70*/öS672r‘) 


J. Kremser/F.Koch 
Amiga-Systemhandbueh 
Systemhandbuch für engagierte Amiga- 
User und Hobby-Bastlerl Mit zahl¬ 
reichen Beispielen ln C und Assembler 
für maschinennahes Programmieren. 
Ausführliche Erläuterung über die 
Möglichkeiten der Amiga-Custom- 
Chips und Hardware-Erweiterungen. 
1988,421 SeHen, inkl. Diskette 
Bestell-Nr. 90550, 

ISBN 3-89090-550-1 
DM79,- (3Fr72,70/öS616r) 


I. Krüger 

Amiga: Programmieren mit Modt 
Leichtverständlicher Modul3-2-Xi 
1988, 350 Seiten. inkl.Olskette 
Bestell-Nr. 90554, ISBN 3-89090‘ 
DM69.- (^r 63,50/öS 538,-) 
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377 lU 

FreeHem(eintrag,slzeof(struct FilelnfoSlook)); 


414 ht 

If(I (FH=(struct FileHandle •»)Open(file,MODE_NEWFILE))) 

378 6b8 

] 



retum(l); 

379 SX 

UnLock(lock)j 


415 kV 

if(Write(FH,buffer,slze)I=slze) rw=l; 

380 8d4 

1 


416 Ok 

Close(FK); 

381 oB 

return(bytes): 


417 si 

returr(rw); 

382 AfO 

i 


418 kFO 

j 

383 Jq 

UBYTE »GetFlle(file,fsi2e) 


419 9M 

LONG GetLW{) 

384 024 

STRPTR flle; 


420 If 

[/* Nummer des aktuellen Laufwerks ermitteln »/ 

385 Db 

LONG »fslze; 


421 Dq4 

struct FilelnfoBlook »elntrag; 

386 qoO 

I /* File in Speicher laden */ 


422 IJ 

struct InfoData »Infos; 

387 7E4 

struct FileHandle »FH; 


423 gJ 

struct FlleLock »lock; 

388 VM 

UBYTE »buffer; 


424 ZH 

LONG disk=-l; 

389 HS 

LONG size; 


425 Iq 

lf(lnfos*(struct InfoData *)AllocMem(3izeof(struct Info 

390 EN 

if((sl 2 e=Exlsts(file))< =0) return(0}; 



Data),ME«F_CLEAR))[ 

391 qJ 

lf(I(buffer=(UBYTE *)AllooMeni(size,MEMF_CLEAR))) return 


426 Uk6 

lf(lock=(struot FileLock *)Lock(NULL,ACCESS_READ) )f 


(0); 


427 5niC 

if(elntrag=(struet FilelnfoBlook *) 

392 ql 

eise lf(l(FH=(struct FileHandle *)Open(file,MODE„OLDFIL 


428 JHG 

AllocMem(slzeof(struct FilelnfoBlook),KEMF_ 


E)))( 



CLEAR))| 

393 718 

FreeMem(buffer,alze)i 


429 dO 

if(Exainine(look, elntrag)) i 

394 pk 

return(O); 


430 92K 

Info(lock,infoa); 

395 Ns4 

1 


431 f4 

diskslnfo8-> id_UnitNumber-f-l; 

396 KX 

eise lf(Re8d(FH,buffer,Blze)l=size){ 


432 yTG 

] 

397 BM8 

FrßeHem(buffer,si2e); 


433 CO 

FreeMein(elntragj slzeof (struct FilelnfoBlook 

398 iS 

Cl09e{FH); 



)); 

399 up 

return{0)5 


434 OVO 

} 

400 Sx4 

1 


435 MR 

UnLook(look); 

401 61 

eiset 


436 2X8 

I 

402 niU8 

Cl 08 e(FH)j 


437 wl 

FreeHemCInfos,slzeof(struct InfoData)); 

403 H7 

*fslze:size; 


438 4Z4 

i 

404 js 

return(buffer) ; 


439 53 

return(dlsk); 

405 X24 

1 


440 6b0 

I 

406 y30 

1 


441 sO 

SHORT ReadDlr(dlrname,anz,flags,namen,slze) 

407 Bm 

BOOL PutFile(flle,buffer,size) 


442 3e4 

STRPTR dirnanie; 

408 mQ4 

STRPTR flle; 


443 Hu 

USHORT anz; 

409 qb 

UBYTE «buffer; 


444 EV 

SHORT flags; 

410 cn 

LONG slze; 


445 19 

UBYTE namenCKFLEN); 

411 t60 

j/* Buffer speichern */ 




412 Wd4 





413 Fj 

BOOL rw.O; 


Listing 1. (Fortsetzung) 
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P.Wollschlaeger 

Amiga: ProgtBmmterprBxis tntuttion 
Eine detaillierte Sescttreibung von Irv 
luitloni Nebender Programmierung von 
Fenstern, Menüs und Grafiken behan¬ 
delt der Autor auch wichtige Rand¬ 
gebiete. wie die Ein- und Ausgabe von 
Texten oder Zugriff auf die Diskette. 
19BB, 330 SeRen, Inkl. Diskette 
Bestell-Nr. 90593. ISBN S-SODOO-SOS-S 
DM69.- (sFr63.50/08 53Sr) 


Markt &Technik-Produkte 
erhalten Sie in den Fachabteilungen 
der Warenhäuser, im Versandhandel, 
In Computer-Fachgeschäften oder 
bei Ihrem Buchhändler 


J.-P LaubU.Wenzl 

Amiga PubHc-Domaln-Ookumentation 
Mit diesem Buch erhalten Sie einen 
detaillierten Überblick Ober die Vielfalt 
der Public-Domain-Programme. 

1989, ca. 400 Selten, 

Bestell-Nr. 90675, ISBN 3-89090-675-3 
ca.OM49.- (sFr 45,10/ 

ÖS382r) 



M. Brauer Amiga-SOO-Buch 
Das vorliegende Buch bietet eine 
behutsame Einführung In die Bedie¬ 
nung des Amiga 500. Ein Handbuchteil 
mit vielen Bildschirmfotos und Über¬ 
sichtstabellen hilft Ihnen, Im täglichen 
Einsatz schnell und reibungslos zu 
arbeiten. 

1987, 489 Seiten 

Bestell-Nr. 90522, 

ISBN 3-89090-522-6 
DM49r 

(sFr 45.10/ÖS 382,-) 


H.R,Henning 
Grafik mtt Amiga-Basic 
Dieses Buch ist speziell der Grafik- 
Programmierung auf dem Amiga 
gewidmet. Der erste Teil stellt für den 
Anfänger alle bekannten Grafik-Befehle 
des Amiga-Basic vor. Mit Beginn des 
zweiten Teiles werden die Routinen des 
Betriebssystems zur Grafik-Program¬ 
mierung herangezogen. 

1989. ca. 300 Selten, Inkl. Diskette 
Bestell-Nr. 90669, ISBN 3-89090-669-9 
DM59,- (sFr54,30/08 460,-) 


H.Knappe 

Fraktsle Grafik auf dem Amiga 
Ein Buch für Fbracher, die an einer revo¬ 
lutionären Entwicklung Inden Naturwis¬ 
senschaften teilnehmen wollen und 
bereit sind, auf Entdeckungsreise zu 
gehen. Reisen Sie mit! 

1988,272 Setten. Inkl. Diskette 
Bestell-Nr. 90600, ISBN 3-89090-600-1 
DM79,- (sFr 72.70/ÖS 616,-) 


* Unverbindliche Preisempfehlung 


Fragen Sie Ihren Fachhändler 
nach unserem kostenlosen Gesamtverzeichnis 
mit über 500 aktuellen Computerbüchern 
und Software. Oder fordern Sie es direkt 
beim Verlag an! 














446 Z6 

LONG size[]j 

447 qjO 

(/* Verzeichnis lesen »/ 

448 sk4 

SHORT i=-l; 

449 fs 

struct FilelnfoBlook »eintrag; 

450 7Jc 

struot FileLook »lock; 

451 cN 

if(lock»(8truct FileLock «)Lock(idirname[0],ACCESS_READ 


))! 

452 UB8 

if(eintrag=(struct FilelnfoBlook *) 

453 igC 

AllocMeDi{sizeof(struct FilelnfoBlook),HEMF CLEA 


R))l 

454 2P 

1 f(Exanine(lock,eintrag)) ( 

455 gHG 

if(TYPE>0)[ 

456 yEK 

for(i=anzji>0ii--) nainen[i-l][0] = '\ 0 'j 

457 xC 

ExNext(lock,eintrag); 

458 Ch 

while{ (IoErr() 1 =ERR0R_N0_M0REJ:NTRIES) & 


&(i<anz))| 

459 kLO 

lf(TYPE>0)[ 

460 6(1S 

lf{flag8jcDIRS)[ 

461 AOW 

8trcpy(inainen[i] [0], &NAME[0 


]); 

462 V6 

If(slze) size[i]«-lj 

463 FD 

1-H-; 

464 U2S 

] 

465 VOO 

1 

466 Pi 

eise iffflags&FILES)! 

467 GUS 

8trcpy{ Stnamenfi] [O], &NAME[0])} 

468 U7 

If(slze) slze[i]sSIZEi 

469 U 

i-H-i 

470 a50 

i 

471 BQ 

ExNext(lock,eintrag) } 

472 c7K 

! 

473 d8G 

1 

474 e9C 

) 

475 84 

FreeHem(eintrag,slzeof(struct FilelnfoBlook)); 

476 gB8 

) 

477 27 

UnLock(lock); 

478 1D4 

j 

479 8i 

return{l); 

480 kFO 

1 

(C) 1988 H&T 

Listing 1. (Schluß) 


Fortsetzung von Seite 25 

Der Programmierer wird sich 
schon eher Gedanken machen, 
denn jede Funktion, die im 
Computer, genauer im ROM 
{»ReadOnlyMemory»), inte¬ 
griert ist, muß er nicht formulie¬ 
ren, er kann sie mitbenutzen. 

Das ROM des Amiga enthält 
eine Vielzahl von Routinen, die 
nur darauf warten, gestartet zu 
werden. Nur wo findet man die¬ 
se? Keine Angst, Sie müssen 
keine ROM-Listings wälzen! 
Der Amiga stellt uns zu den ver¬ 
schiedenen Betriebssystemtei¬ 
len sogenannte Libraries zur 
Verfügung. Diese Libraries sind 
Sprungtabellen zu den einzel¬ 
nen Routinen. Um Platz zu spa¬ 
ren, sind nicht alle Bibliotheken 
im ROM. Diejenigen, die selte¬ 
ner benötigt werden, finden Sie 
auf der Workbench im Ver¬ 
zeichnis »LIBS«, sie werden bei 
Bedarf nachgeladen. Tabelle 2 
zeigt alle zur Zeit verfügbaren 
Libraries und deren Aufgaben¬ 
gebiet. Abgesehen von der Tat¬ 
sache, daß uns das Studium 
des Amiga-ROM-Listings er¬ 
spart bleibt, hat die Verwen¬ 
dung von Libraries einen zwei¬ 
ten entscheidenden Vorteii: Bei 
Überarbeitung des Betriebssy¬ 
stems müssen nicht alle Pro¬ 
gramme geändert, sondern le¬ 


diglich die Tabellen in den Li¬ 
braries aktualisiert werden. 

Wenn Sie Ihren Amiga ein¬ 
schalten (oder nach einem Re¬ 
set), ist nur eine einzige Library 
ansprechbar, die»exec.library«. 
Alle anderen werden je nach 
Bedarf vom Programm aus ge¬ 
öffnet, wie zum Beispiel die 
»dos.library« vom Startup- 
Programm. 

Systemroutinen 

mitbenutzen 

»öffnen« bedeutet die Basis¬ 
adresse der Sprungtabelle er¬ 
mitteln - die Tabellen befinden 
sich nämlich nicht immer an der 
gleichen Stelle im Speicher. 
Wenn diese Basisadresse be¬ 
kannt ist, kann über einen soge¬ 
nannten Offset, das ist die Diffe¬ 
renz der Basisadresse zur 
Adresse des JMP-Befehls in 
der Tabelle, die Funktion aufge¬ 
rufen werden. 

Da uns direkt nach dem Ein¬ 
schalten beziehungsweise Re¬ 
set nur die exec.library zur Ver¬ 
fügung steht, muß die Funktion 
zum Offnen einer Library in der 
Exec-Sprungtabelle zu finden 
sein. Das bedeutet aber, daß 
auch die Basisadresse der 
exec.library bekannt sein muß. 


Das ist korrekt - diese Adresse 
steht immer ab der Speicher¬ 
stelle 4, der einzigen Speicher¬ 
stelle im Amiga, die immer die 
gleiche Information enthält. 
Man erhält diese Adresse auch 
über die vordefinierte Konstan¬ 
te »SysBase« (siehe Tabelle 3). 

Aber das Arbeiten mit Offsets 
überlassen wir besser dem 
Compiler. Wir sprechen unsere 
Funktionen einfach mit ihrem 
Namen an. Etwa so: 

OpenLibrary("intultion. 
library^0); 

Die Exec-Funktion »OpenLi- 
braryO« öffnet die für Intuition 
zuständige Bibliothek. Wie Sie 
sehen, benötigt die Funktion 
zwei Parameter; als ersten den 
Library-Namen und als zweiten 
die Versionsnummer der Libra¬ 
ry. Null als Versionsnummer for¬ 
dert die aktuelle (neueste) 
Library-Version. 

»OpenLibraryO« liefert die 
Adresse der Struktur, die die 
notwendigen Informationen der 
gewünschten Library enthält. 
Entsprechend muß eine Zeiger¬ 
variable (32 Bit) definiert wer¬ 
den, die diese Adresse aufneh¬ 
men kann. 

Der Variablenname kann je¬ 
doch nicht frei gewählt werden. 
Tabelle 3 zeigt eine Aufstellung 
aller fest vereinbarten Varia¬ 
blennamen und der entspre¬ 
chenden Libraries. Die Zeiger¬ 
variable muß darüber hinaus 
global, also außerhalb jeder 
Funktion vereinbart sein, so 
daß zum Beispiel das Öffnen 
der Intuition.library die in ü- 
sting 2 definierte Sequenz ver¬ 
langt. »IntuitionBase« ist seiner¬ 
seits wieder eine Struktur, die 
im Headerfile »intuitlon/intui- 
tionbase.h« definiert ist. Sie ent¬ 
hält als erstes Element eine 
Library-Struktur, die durch den 
Aufruf von OpenLibraryO initia¬ 
lisiert wird. 

Mittels des »Cast«-Operators 
greifen wir einer Konvertierung 
vor. Konnte die Bibliothek nicht 
geöffnet werden, liefert OpenLi¬ 
braryO den Wert »NULL«. 

Fassen wir zusammen: Be¬ 
vor wir mit dem Programmieren 
beginnen können, müssen wir 


Arno Gölzer 



sammelte seine ersten Com¬ 
puter-Erfahrungen - wie zwei 
Millionen andere Computer¬ 
freaks - auf einem C64, Ersten 
Programmierversuchen in Ba¬ 
sic folgte der Umstieg auf das 
schnellere Assembler. 

Die Leistungsfähigkeit die¬ 
ser Sprache stärkte seine 
Treue zujenem phantastischen 
Computer - allerdings nur bis 
zum Erscheinen des Amiga. 
Dieser stand am Anfang einer 
steilen Programmierer-Kar¬ 
riere; 

Arno Gölzer veröffentlichte 
bereits mehrere Programme 
im AMIGA-Magazin, zwei da¬ 
von wurden Listing des Mo¬ 
nats, »Volltreffer«, eine Billard¬ 
simulation, Listing des Jahres. 
Daneben veröffentlichte er - 
ebenfalls im AMIGA-Magazin - 
C-Kurse für Anfänger und Fort¬ 
geschrittene. In diesem Son¬ 
derheft finden Sie neben dem 
neuen C-Kurs, der Ihnen das 
Amiga-Betriebssystem nahe¬ 
bringt, eine Shell, ein Ray- 
Tracing-Programm und einen 
Sound-Editor aus seiner »Fe¬ 
der«. 

Arno Gölzer begann nach 
der mittleren Reife eine Lehre 
in Elektronik und Maschinen¬ 
bau. Seit 1987 studiert er Ma¬ 
schinenbautechnik. 


uns überlegen, weichen Teil 
des Amiga-Betriebssystems wir 
mitbenutzen möchten und 
dann die entsprechende Libra¬ 
ry öffnen. Diese Prozedur muß 
auch bei dem kleinsten Pro¬ 
grammwiederholtwerden. Hier 
findet unser Headerfile seinen 
ersten Einsatz: »Tool.h« kann 


8truct IntuitlonBaae »IntultloTiBase; 

funktionO 

( 

IrtultlonBase={struot IntuitionBase *)OpenLibrary("intuition. 
library',0); 

if(IntuitlonBase==NULL) exit(E[lROR); 



Listing 2. Ein Beispiel für das Öffnen einer Library 
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/» 

\ \ Beep.c 
*/ 

#include "TOOL.h" 

VOID mainO /* Hauptfunktion »/ 

! 

if(OpenLlb()){ 

printf("Kann Intuition nicht öffnenl\ n'); 

] 

eise [ 

DisplayBeep(0}; 

CloseLibO; 

1 

] 

Listing 3. Der erste Einsatz von »Tool.h« - 
ein Bildschirmblitz 


uns diese Arbeit abnehmen. 
Schauen wir uns das Listing et¬ 
was genauer an. 

Zu Beginn werden alle not¬ 
wendigen Headerfiles einge¬ 
bunden. Da die Eingliederung 
von Headerfiles in Headerfiles 
erlaubt ist, können wir alle be¬ 
nötigten von Tool.h aus einbin¬ 
den und uns so lästige Schreib¬ 
arbeit sparen. Ein sehr wichti¬ 
ges und interessantes Header¬ 
file ist »functions.h«. Dort wer¬ 
den fast alle Betriebssystem¬ 
routinen deklariert. Mit der Ein¬ 
bindung ersparen wir uns lästi¬ 
ge »Warnings«. Für den Lattice- 
Compiler finden Sie vergleich¬ 
bare Haeder-Files unter den so¬ 
genannten »Prototypes«. Auch 
dieses File sollten Sie sich ge¬ 
nau ansehen. Im weiteren Ver¬ 
lauf dieses Kurses verweisen 
wir immer wieder auf interes¬ 
sante Headerfiles. Machen Sie 
sich bitte die Mühe, diese auf¬ 
merksam durchzuarbeiten. Es 
werden Ihnen dann sicher Zu¬ 
sammenhänge klar, die Ihnen 
sonst verborgen bleiben.« 

Im nächsten Tool.h-Abschnitt 
finden Sie einige Symboldefini¬ 
tionen und Makros. Doch dar¬ 
über werden Sie mehr erfah¬ 
ren, wenn diese benutzt wer¬ 
den. Es folgt die globale Defini¬ 
tion der »Base«-Adressen, die 
oben erwähnt wurden. Die Va¬ 
riable IntuitionBase wurde zum 
Beispiel in diesem Bereich als 
Zeiger auf die IntuitionBase- 
Struktur vereinbart. Die Funk¬ 
tionen schließen sich an. Sie 
sind untergliedert in Libraries, 
Intuition-, Grafik- und DOS- 
Tools. Beginnen wir mit der 
gleich am Anfang definierten 
Funktion OpenLibO- Sie be¬ 
sorgt das Öffnen der notwendi¬ 
gen Libraries. In der vorliegen¬ 
den Tool.h-Version sind dies die 
Intuition.library und die Gra- 
phics.library. Die letztere bein¬ 
haltet, wie ihr Name schon an¬ 
deutet, die Adressen der Grafik¬ 
routinen. Später können Sie Ihr 
Tool natürlich erweitern. 


OpenLibO kehrt mit dem Wert 
0 zurück, wenn alle gewünsch¬ 
ten Libraries geöffnet sind. Im 
anderen Fall entspricht der Re- 
turn-Wert der Nummer der Bi¬ 
bliothek, welche OpenLibQ 
nicht öffnen konnte. Das heißt 
also, wenn sich Intuition nicht 
öffnen läßt, ist das Ergebnis von 
OpenLibO wenn sich die 
GraphicsLibrary nicht öffnen 
läßt zwei und so weiter. 

CloseLibO. die nächste Funk¬ 
tion in unserem Headerfile, ist - 
wie der Name vermuten läßt - 
das Gegenstück zu OpenLibO- 
Sie schließt alle bisher geöffne¬ 
ten Libraries. 

Im nächsten großen Ab¬ 
schnitt sind die Intuition-Tools 
aufgelistet, die Routinen zu 
dem Betriebssystemteil, wel¬ 
chen wir als erstes beleuchten 
wollen. 

Intuition, was verbirgt sich 
hinter diesem Begriff? Im Zu¬ 
sammenhang mit dem Amiga 
hört man sehr oft davon. 

Intuition? 

Intuition! 

Im Wörterbuch findet man 
hierfür »Eingebung« oder »ver¬ 
wickelte Zusammenhänge so¬ 
fort richtig erfassen«, und das 
trifft den Nagel auf den Kopf. 
Gemeint ist nämlich die Benut¬ 
zeroberfläche des Amiga mit 


den Screens, den Windows, 
Menüs und Gadgets. Hier fin¬ 
det man sich auch als Anfänger 
rasch zurecht - man erfaßt so¬ 
fort die Zusammenhänge. 

Bevor wir nun die Intuition- 
Tools im einzelnen besprechen, 
wagen wir doch einen kleinen 
Versuch mit den bereits bespro¬ 
chenen Funktionen. »Beep.c« 
(Listing 3) läßt alle zur Zeit des 
Aufrufs geöffneten Screens 
aufblitzen. Das Programm 
macht sich gut als CLI-I^m- 
mando, etwa um den Anwender 
auf einen Fehler während der 
Ausführung einer Batchdatei, 
zum Beispiel der Startup-Se- 
quence, aufmerksam zu ma¬ 
chen. 

Schauen wir uns das Pro¬ 
gramm gemeinsam an: In der 
ersten Zeile wird unser Header¬ 
file mit Hilfe der» # include«-An- 
weisung eingebunden. Diese 
Anweisung veranlaßt den Pre¬ 
prozessor, die Zeile vor der 
Compilierung durch das ange¬ 
gebene File zu ersetzen. Sonst 
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ist in unserem kleinen Pro¬ 
gramm nur noch die Haupt¬ 
funktion »mainO« definiert. Dort 
rufen wir zu Beginn die Funk¬ 
tion OpenLibO auf. Sollte sie ei¬ 
nen Wert ungleich »NULL« lie¬ 
fern, erfolgt nach der Ausgabe 
einer entsprechenden Fehler¬ 
meldung sofort das Programm¬ 
ende. 

Sind die Libraries erfolgreich 
geöffnet, starten wir auch 
gleich unsere erste Intuition-Sy- 
stemroutine: »DisplayBeepQ«. 
Diese Funktion läßt wahlweise 
einen oder auch alle geöffneten 
Screens (siehe unten) aufblit¬ 
zen. Ais Parameter benötigt sie 
einen Zeiger auf den Screen, 
der blitzen soll. Wenn Sie einen 
Nullzeiger übergeben, ist der 
Blitz auf jedem Screen zu se- 
hen. 

DisplayBeep{8cScreen); / 

* der Bildschirm mit der 
Adresse »Screen« 
blitzt x/ 

DisplayBeep(O)j / 

* alle geöffneten Bild¬ 
schirme (Screens) 
blitzen */ 

Kinderleicht, oder? Als letz¬ 
ten Schritt schließen wir mit Hil¬ 
fe von »CloseLibO« alle Libra¬ 
ries. Das ist sehr wichtig, denn 
die Libraries werden beim Pro¬ 
grammende nicht automatisch 
geschlossen. Genauso verhält 
es sich beim Öffnen von 
Screens, Windows, Devices 
oder beim Reservieren von 
Speicherplätzen, aber davon 
später mehr. Zuerst müssen wir 
einmal ergründen, was wir da 
gerade zum Blitzen gebracht 
haben. 


Screen 



clist 

ClistBase 

diskfont 

DiskfontBase 

dos 

DosBase 

exec 

SysBase 

expansion 

ExpansionBase 

graphics 

GfxBase 

icon 

IconBase 

Intuition 

IntuitionBase 

layers 

LayersBase 

mathffp 

MathBase 

mathieeedoubbas 

MathleeeDoubBasBase 

mathtrans 

MathTransBase 

potgo 

PotgoBase 

translator 

TranslatorBase 


Tabelle 3. Der Name der Variablen, die die Basisadresse 
einer Library enthält, kann nicht beliebig gewählt werden 


... ist die Basis-Darstellungs- 
fläche für alle Intuition-Elemen¬ 
te. Ohne Screen kein Fenster, 
keine Menüs, noch nicht einmal 
das kleinste Gadget. Das beste 
Beispiel hierfür ist der Work- 
benchscreen. Geben Sie doch 
einmal aus dem CLI heraus das 
Itommando »ENDCLI« ein, oh¬ 
ne vorher mit »LOADWB« die 
Workbench gestartet zu haben. 
Der Workbenchscreen bleibt 
geschlossen und es wird etwas 
langweilig. 

Der Amiga ist in der Lage, ei¬ 
ne beliebige Anzahl verschie¬ 
dener Bildschirme gleichzeitig 
zu verwalten. Allein der Spei¬ 
cher setzt uns hier Grenzen, 


denn die Daten der Screens lie¬ 
gen im sogenannten Chip-Me¬ 
mory, das sind die untersten 
512 KByte im Speicher. Diese 
Daten sind übrigens nicht fest 
an Adressen gebunden, wie 
zum Beispiel der Bildschirm¬ 
speicher des C64. 

Durch die Vereinbarung ver¬ 
schiedener Parameter wird das 
Aussehen eines Screens, (Grö¬ 
ße, Position, Auflösung und so 
weiter) bestimmt. Diese Para¬ 
meter werden in einer besonde¬ 
ren Struktur, der NewScreen- 
Struktur übergeben. Diese 
Struktur (Listing 4) ist im Hea¬ 
derfile »Intuition.h« definiert. 
Hier die Bedeutung der einzel- 
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Bild 1. Die Bit-Ebenen legen die Farbnummern eines 
Punktes auf dem Bildschirm fest 


struct NewScreen 
[ 

SHORT LeftEdge; 

SHORT TopEdgej 
SHORT Wldthj 
SHORT Height 
SHORT Depthj 

ÜBYTE DetallPen, BlockPen; 
USHORT ViewModes; 

USHORT Type; 

atmet TextAttr »Font; 

UBYTE »DefaultTitle; 
struct Gadget »Gadgets; 
stmet BltMap »CustomBitMap; 

] i 

LIsting 4. Die NewScreen- 
Struktur vereint alle 
Parameter eines Screens 


nen l^mponenten dieser wich¬ 
tigen Struktur: 

LeftEdge beschreibt die 
X-Position der linken Bild¬ 
schirmseite. Diese Variable hat 
in der aktuellen Betriebssy¬ 
stemversion noch keine Bedeu¬ 
tung, setzen Sie diese daher 
stets auf Null. 

TopEdge ist die Y-Position 
der oberen Bildschirmkante, 
nach dem Öffnen des Screens. 
Wenn Sie einen größeren Wert 
als 0 eingeben, wird (wenn 
mehrere vorhanden sind) der 
Screen im Hintergrund geöff¬ 
net. 

Die beiden beschriebenen 
Variablen geben die Position 
des Screens an. Screens kön¬ 
nen in der aktuellen Version 
des Betriebssystems nach dem 
Öffnen nur in Y-Richtung ver¬ 
schoben werden. Dazu muß die 
Titelleiste - das ist der Balken 
am oberen Screenende -• mit 
der Maus angeklickt und nach 
unten oder oben geschoben 
werden. 

Width beschreibt die Breite 
des Bildschirms. Auch wenn 
Sie hier einen kleineren Wert 
als die mögliche Auflösung in 
X-Richtung angeben, wird ein 
eventuell im Hintergrund lie¬ 
gender Screen nicht sichtbar. 
Die maximale Breite eines Bild¬ 
schirms ist abhängig vom ein¬ 
gestellten View-Modus (siehe 
unten) und beträgt, wenn »Hl- 
RES« eingestellt ist 640, anson¬ 
sten 320 Punkte. 

Height ist die Höhe des 
Screens. Auch hier bleibt der 
Hintergrund-Screen verborgen, 
selbst wenn er, durch die Anga¬ 
be eines entsprechend kleinen 
Wertes für die Bildschirmhöhe, 
theoretisch sichtbar sein könn¬ 
te. Auch die maximale Höhe ist 
von der gewählten Auflösung 
abhängig. Im »LACE«-Modus 
(siehe unten) beträgt sie 512, im 
anderen Fall 256 Punkte. 

Depth (Tiefe) gibt die Anzahl 
der Bit-Ebenen an. Die Bildda- 
ten für den Screen sind in ver¬ 


schiedene Ebenen aufgeteilt. 
Im einfachsten Fall bedeutet ein 
gesetztes Bit im Speicher einen 
gesetzten Punkt auf dem Bild¬ 
schirm. Greifen wir uns einmal 
einen beliebigen Punkt des 
Bildschirms heraus. Irgendwo 
im Speicher ist für diesen Punkt 
ein Bit entweder gesetzt oder 
auch nicht gesetzt. Wir erhalten 
jedenfalls einen Wert für den 
Zustand dieses Bits, nämlich 0 
oder 1. Dieser Wert gibt an, wel¬ 
ches Farbregister für den Punkt 
auf dem Bildschirm zuständig 
ist. Der Amiga verfügt über 32 
solcher Farbregister. Jedes die¬ 
ser Register kann einen 12 Bit 
breiten Farbwert aufnehmen, 
das sind immerhin 4096 Mög¬ 
lichkeiten. Die untersten 4 Bits 
eines jeden Farbregisters be¬ 
schreiben den Blau-Anteil, die 
nächsten 4 den Grün-Anteil und 
wieder die nächsten 4 den Rot- 
Anteil der gewünschten Farbe. 
Da die Farbregister jedoch 16 
Bit breit sind, bleiben die 4 
obersten Bit (bisher) noch un¬ 
genutzt. 

Rot, Grün und 
Blau getrennt 

Angenommen, Register 0 ist 
für die Hintergrundfarbe zu¬ 
ständig und enthält den hexa¬ 
dezimalen Wert »OxOFOO« 
(blau), Register 1 den Wert 
»OxOFFF« für weiß. Demzufolge 
muß unser Punkt weiß sein, 
wenn das entsprechende Bit im 
Speicher gesetzt ist, denn ein 
gesetztes Bit entspricht dem 
Wert 1. Der Punkt erhält daher 
die Farbe aus Farbregister eins 
und dieses enthält den Wert für 
weiß. 

Ist das Bit im Speicher nicht 
gesetzt, so entspricht das dem 
Wert 0. Die Farbe des Punktes 
auf dem Screen richtet sich al¬ 
so nach dem Inhalt des Farbre¬ 
gisters 0 - er wird blau darge- 
stellt. 

Wie oben erwähnt, hat der 
Amiga aber 32 Farbregister. 

Um diese Palette auszu¬ 
schöpfen, müssen wir unserem 
PunM nur genügend Bits zur 
Verfügung stellen. Um 32 (= 2 
hoch 5) verschiedene Zustände 
darstellen zu können, benöti¬ 


gen wir 5 Bit. Da wir natürlich 
die anderen Punkte nicht be¬ 
nachteiligen wollen, erhält je¬ 
der seine 5 Bits und so entste¬ 
hen fünf Bit-Ebenen (Bild 1), 
Der benötigte Speicherplatz ei¬ 
nes Bildschirms wächst propor¬ 
tional zu der Anzahl der ge¬ 
wünschten Punkte (Auflösung) 
und ebenfalls proportional zu 
der Anzahl der Bit-Ebenen. 
Daher berechnet sich zum 
Beispiel der Speicherplatz 
für einen »HIRESLACE«<-Bild- 
schirm mit vier Bit-Ebenen, das 
sind 2^ = 16 Farben, wie folgt: 

Memory=(640*512)Punkte*4 
Bit-Ebenen 

Das sind 1310720 Bit oder 
163840 Byte. In Tabelle 4 finden 
Sie die Anzahl der Farben, die 
zugehörenden Farbregister 
und den benötigten Speicher¬ 
platz für jeden Depth-Wert. 

Entsprechend der Anzahl der 
Farbregister kann die Anzahl 
der Bitplanes den Wert 5 nicht 
überschreiten. Dennoch ist ei¬ 
ne sechste Bit-Ebene vorhan¬ 
den. 


Diese findet unter anderem 
in zwei besonderen Modi, dem 

»EXTRA_HALF_BRITE«- 
und dem >»HAM«-Modus, Ver¬ 
wendung. Diese sind weiter un¬ 
ten ausführlicher beschrieben. 
Im Moment ist nur wichtig fest¬ 
zuhalten, daß der Wert für 
Depth zwischen 0 und 7 liegen 
muß. 

DetailPen verwenden Sie, 
um die Nummer des Farbregi¬ 
sters einzutragen, das die Far¬ 
be enthält, mit der die Schrift 
und die Gadgets der Screen- 
Titelleiste erscheinen sollen. 
Oft wird hier der Wert 0 einge¬ 
tragen. 

BlockPen ist die »Stiftfarbe« 
mit der die Titelleiste des 
Screens gefüllt wird. Auch hier 
wird wieder die Nummer des 
Farbregisters verlangt, das die 
gewünschte Farbe enthält. Der 
Wert 1 hat sich hier eingebür¬ 
gert. natürlich ist auch jeder an¬ 
dere Wert von 0 bis er¬ 
laubt. 

ViewModes legt die Darstel¬ 
lungsmodi des Amiga fest. 
Durch Setzen verschiedener 



Bitplanes 

Farben 

Farbregister 

320*256 

320*512 

640*256 

640*512 Punkte 

1 

2 

0 und 1 

10240 

20480 

20480 

40960 Bytes 

2 

4 

0 bis 3 

20480 

40960 

40960 

81920 B;^es 

3 

8 

Obis 7 

30720 

61440 

61440 

122880 Bytes 

4 

16 

0 bis 15 

40960 

81920 

81920 

163840 Bytes 

5 

32 

0 bis 31 

51200 

102400 

— 

— 


Tabelle 4. Mit dem Wert für die Depth-Variable der NewScreen-Struktur ändert sich die 
Anzahl der Farben, aber auch der benötigte Speicherplatz 
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Direkt bestellen statt abtippen! 

Die aktuelle Diskette zum Heft: 


Amiga Sonderheft 4: 

C und Assembler 

Raytracer: berechnet fantastische 3-D-Bilder (siehe 
Foto). Die Grafikfähigkeiten des Amiga werden eindrucks¬ 
voll genutzt. 



Sound-Effekte-Editor: Zeichnen Sie beliebige Ge¬ 
räusche mit der Maus. Der Clou: Die Sounds werden als 
C-Sourcecode gespeichert und sind leicht in eigene Pro¬ 
gramme zu übernehmen. 

Programmiertools: Jeweils eine mausgesteuerte Be¬ 
nutzeroberfläche für lattice- und Aztec-Compiler. Pro¬ 
grammieren wird ebenso komfortabel wie das Arbeiten 
mit der Workbench. Eine Shell hilft bei der Vereinfachung 
umständlicher CLI-Operationen. 

Weiterhin befinden sich auf der Diskette alle Programme 
komplett mit den jeweiligen Quelltexten, die im Inhaltsver¬ 
zeichnis des Amiga-Sonderhefts 4 mit einem Disketten¬ 
symbol gekennzeichnet sind. 


3 V 2 "-Diskette für Amiga 

Bestell-Nr. 45904 


DM29,90 


{s¥r 24,90 */ö5 299,-*) 

Unverbindliche Preisempfehlung 
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Sie suchen hilfreiche 
Utilities und professio¬ 
nelle Anwendungen für 
Ihren Computer? Sie 
wünschen sich gute Soft¬ 
ware zu vernünftigen 
Preisen? Hier finden Sie 
beidesl 

Unser stetig wochsendes 
Sortiment enthalt interes¬ 
sante Listing-Software 
für olle gängigen 
Computertypen. Jeden 
Monat erweitert sich 
unser aktuelles Angebot 
um eine weitere interes¬ 
sante Programmsamm¬ 
lung für jeweils einen 
Computertyp. 

Bei Fragen zu Bestellung 
und Versand der 
Programmservice- 
Disketten wählen Sie 
bitte: 

Telefon (089) 4613-232. 

Bestellungan bin« nur gsgan 
Vorauskosso on: Markt&Teehnik 
Varlog AG, Unlernehm#n»b«raieh 
Buchvarlog, Hont-Pinsel-Strol^ 2, 
D.8013 Hoor, 

Talsfon (0S9) A613-0. 

Schweiz: MorktiTachnih 
Vartriabs AG, Kollarslro»>a 3, 
CH.6300 Zug, Telefon 042) 
415656. 

Österreich: Morkl&Tachnlk 
Varlog Gesellschaft m,b.H,, 
Große Neugossa 28, 

A.1040 Wien, Telefon 
(0222)5871393-0, 
Microcompui-iqus, E. Schiller, 
Fosongosse 24, A-1030 Wien, 
Telefon (0222) 785661; 
Bücherzentrum Meidling. 
Schönbrunner Straße 261. 

A-1120 Wien, 

Telefon (0222) 833196. 
Ueberrauter Medio, 

Verlogsges. mbH (Großhondel), 
Loudongosse 29, A-1082 Wien 
Telefon (0222) 481543-0. 
Bestellungen aus anderen 
Ländern bitte nur schriftlich o- 
Morkt&Tachnik Verlag AG, 

Abt. Buchvertrieb, Hons-Pinsel- 
Straße 2, D-6013 Hoor. Nur 
gegen Bezahlung der Rechnung 
im vorous. 

Bitte verwenden Sie für 
Ihre Bestellung und 
Überweisung die beige¬ 
heftete Postgiro-Zahlkarte, 
oder senden Sie uns 
einen Verrechnungs- 
Scheck mit Ihrer Bestel¬ 
lung. Sie erleichtern uns 
die Auftrogsabwicklung, 
und dafür berechnen wir 
Ihnen keine Versand¬ 
kosten. 


Amiga Sonderheft 3: 

Basic, Spiele 

Broker: Ergeben Sie die Fbszination der Börse hautnoh. Diese 
Simulation für 2 bis 4 Spieler ist einzigartig. Der Autor setzt seine 
fundierten Kenntnisse in spannendes Spielgeschehen um. 
Ping-Pong: Dieses Sportspiel bringt Wettkampfstimmung ins 
Wohnzimmer. Dreidimensionale Darstellung, realistische Soun¬ 
deffekte und rasante Ballwechsel führen zu lang anhaltendem 
Spielspoß. 

Anpfiff: Als Manager in der Fuliball-Bundesliga führen Sie Ihr 
LieÜingsteam durch die Saison, Zusätzliche Spiele im UEfA-Cup 
verhelfen Ihrer Mannschaft zu Ruhm und Ihnen zu vielen 
Manager-Punkten. 

Basic-Routinen: Die Basic-Kurse im Sonderheft 3 bieten zahl¬ 
reiche, hilfreiche Routinen. Alle dort vorgestellten Programme 
finden Sie auch auf dieser Programmservice-Diskette. 
Weiterhin befinden sich auf der Diskette alle Pragtamme, die im 
Inhaltsverzeichnis des Amiga-Sonderhefts 3 mit einem Disket¬ 
tensymbol gekennzeichnet sind. 

3V2"-Diskette für Amiga 

Bestell-Nr. 45903 DM 29,90* sFr 24,90*/öS 299,-* 


Amiga Sonderheft 2: 

Grafik, Anwendung 

Object-Editor: Animierte Figuren, beispielsweise für eigene 
Spiele, entwickeln Sie mit diesem Editor auf komfortable Weise. 
Sogar mit Deluxe Point erstellte Pinsel lassen sich einiesen. 
Haushaltsbuch: Mit diesem hervorrogenden Anwendungspro¬ 
gramm verwalten Sie olle Einnahmen und Ausgaben auf über¬ 
sichtliche Weise. Eine Monats- oder Jahresstatistik zeigt, in wel¬ 
chen Bereichen Sie zukünftig sparen können. Jetzt haben Sie 
Ihre Finanzen im Griff. 

Keyboard-Master: lernen Sie im Zehn-Finger-System zu tippen. 
Mit diesem didaktisch ausgereiften Programm ist dies kein Pro¬ 
blem. Für Programmierer sind sogar Spezial-bktionen mit wich¬ 
tigen Sonderzeichen vorhanden. 

FostLoadCopy: Dieses Idol bringt den DIR-Befehl auf Trab. 
Nach der »Operation« wird das Inhaltsverzeichnis einer Dis¬ 
kette im D-Zug-Tempo eingelesen. Zusätzlich kopiert das Pro¬ 
gramm Disketten und versieht diese mit dem schnellen Directory. 
Weiterhin befinden sich auf der Diskette alle Programme, die im 
Inhaltsverzeichnis des Amiga-Sonderhefts 2 mit einem Disket¬ 
tensymbol gekennzeichnet sind, 

S'/z^Diskette für Amiga 
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Bewegte Grafik per Farbdurchiauf - 
Diashow für Anspruchsvolle 

Es ist vollbracht! Die besten Cycling-Grofiken können nun alle 
grofikbegeisterten leser hautnah erleben. Die schönsten Bilder 
des »Color-Cydes-Wettbewerbs, das im Amiga-Magazin (Aus¬ 
gabe 3/88 Seite 142) gestartet wurde, präsentieren wir Ihnen 
auf zwei randvoll bespielten Disketten. 

Die Bilder können entweder mit dem enthaltenen Dioshow- 
Programm angesehen oder mit jedem gängigen IFF- 
Malprogromm (zum Beispiel Deluxe Paint II] geladen werden, 
lassen Sie sich die faszinierenden Computer-Bilder nicht 
entgehen. 

Zwei Disketten für Amiga. 

Bestell-Nr. 49901 DM 29,90* sFr 24,90*/öS 299,-* 


Die Wiederbelebung für die 
C64-Peripherie 

Viele Amiga-Besitzer haben noch einen C64 mit Peripheriege¬ 
räten zu Hause stehen. Mit ein bißchen Hard- und Software 
können Sie diese zu neuem lst>en erwecken und Ihre Daten so 
weiterbenutzen. Dabei ist die Bedienung wirklich einfach. 

Der fertig aufgebaute lEC-Handler erlaubt es, alle C64-Getäte 
wie die Floppy 1541 oder 1571, Commodore-MPSDrucker und 
natürlich auch den C64 (zur Datenübertragung) am Amiga zu 
betreiben. 


Das Gesamtpaket besteht aus der fertig aufgebauten Platine mit 
\ferbindungskahel, der Treibersoflwate auf 3V2''-Diskette sowie 
einer entsprechenden Dokumentation. 

Bestell-Nr. 39101 DM 79 /-* sFr 71,-'/öS 790,-* 


Bestellungen bitte nur gegen Vorouskasse bei: 
Markt&Technik \ferlag AG 
- Buchverlag - 
lEC-Handler 

Hans-Pinsei-Straße 2, 8013 Haar bei München 


Amiga 3/88 

Bildschirmfüllende Boot-BUder 
mit allen Extras 

BootGirl: Fantastische Bilder sofort nach dem Reset. Bis zu 32 
Farben mit Color-Cycling, Die Bilder können auch bildschirm¬ 
füllend ohne Rond sein. Ein obsolutes Muß für jeden Amiga- 
Besitzer. 

CassCover: Selbstgedruckte Kassettenhüllen geben Ihnen den 
richtigen Überblick. Einfache Bedienung macht das Eingeben 
und Ausdrucken zur wahren Freude. 

Command: Das Progromm ermöglicht die Steuerung des Aztec- 
C-Compilers mit der Maus. Keine fangen Eingaben per Tastatur, 
sondern ein einziger Mausklick startet nun die Übersetzung. 
VideoText: Ein unentbehrliches Werkzeug für alle Video-Fons, 
die ihren eigenen Vorspann mit dem Amigo generieren wollen, 
bufbönder, verschiedene Schriften und IFF-Bildersind nur einige 
Stichpunkte, die das Programm so interessant machen. 
3Vz"-Diskette für Amiga 
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Amiga 12/87 

Super^Koplerprogramm mit viel 
Komfort 

DCopy: Unser Programm des Monats, ein Kopierprogramm, 
das alles bietet, was man sich nur wünschen kann. Einige Fähig¬ 
keiten: Bis zu vier bufwerke werden venAendet, Mehrfach¬ 
kopien, abschalfaares Wrify und vieles mehr. 

SpeedHc: Eine sehr schnelle Hardcopyroutine für Schwarz¬ 
weißausdrucke mit höchster Qualität, leicht an andere Drucker 
onzupassen. 

Sternenhimmel: Ein unentbehrliches Werkzeug für olle Him¬ 
melsbeobachter. Das Progromm zeigt alle Sterne und Planeten 
von jedem beliebigen Punkt der nördlichen Hemisphäre. 
Checkie42: Der Checksummer für alle Programmiersprochen 
von Assembler über Bosic bis zu C. Ab dieser Ausgabe finden 
Sie bei jedem Listing die Prüfziffern. 

Joy: Ein sehr kurzes und schnelles C-Progromm zur Abfroge des 
Joysticks. Es ist leicht in eigene Programme einzubinden. 
Amiga-Shell: Ein C-Programm, das Kfamfort ins CU bringt. 
Editieren der Befehlszeile, Funktionstostenbelegung und Alias¬ 
nomen sind nur einige Fähigkeiten dieses fantastischen Pro¬ 
gramms. 

3V2'’-Diskette für Amiga 
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Mit den Gutscheinen aus dem 
UDriyCnS. »Super-Sottware-Scheckheft« für 
DM 149,- können Sie sechs Software-Disketten Ihrer 
Wahl aus dem Programm-Service-Angebot der Zeit¬ 
schriften 

PC Magazin Happy-Computer-Sondertieft Computer persönlich 

PC Magazin Plus Amiga-Magazin 64’er-Magazin 

Happy-Computer Amiga-Sonderheft 64’er-$onderlieft 

bestellen - egal, ob diese DM 29,90 oder DM 34,90 
kosten. Das Scheckheft können Sie per Verrechnungs¬ 
scheck oder mit der eingehefteten Zahlkarte direkt 
beim Verlag bestellen. 

Kennwort: Software-Scheckheft, Bestell-Nr. 39100. 









C-Kms 


/* 

\ \ EHB.c - Extra-Halfbright Demo 
V 

#include "TOOL.h" 

#define VP &(Screen->ViewPort) 

#define RP &(Screen->RastPort) 
struct Screen «Screenj 
VOID error(meldung) 

STRPTR meldung; 

{ 

If(ineldung) prlntf('ERROR: *s",meldung); /* Fehlermeldung */ 
if(Sereen) CloseScreen(Soreen); /* Screen schließen */ 

CloseLlbO; /* Libraries schließen */ 
exit(O); 

] 

VOID mainO 

i 

REGISTER COUNT i,J,ypos=256; 
if(OpenLlb())( /* Libraries öffnen */ 

error("Kann Libraries nicht öffnen!\ n'); /* Fehlermeldung */ 

] 

if(!(Screen=GetScreen(ypos,6.EXTRA_HALFBRITE,"EHB-SCREEN Demo")))( 
error("Kann Screen nicht öffnen I\ n"); 

1 

for(i=0,j«0;l<16;i++,J+=2)[ /» 32 Farben definieren »/ 

SetRGB4(VP, 

SetRGB4(VP,l6+l,l,i/2,j); 

1 

for(i.0;i<32{l-H-)( 

SetAPen(RP,i)j /» Zelohenfarben 0 bis 31 festlegen */ 
RectFlll(RP,10*i, 12,10*1+9,255); /» Rechteck zeichnen */ 
SetAPen(RP,l+32); /» Zeichenfarben 32 bis 63 (!) festlegen */ 
RectFlll(RP,10»i,100,10*1+9,155); 

1 

whlle(ypos—>=0) MoveSoreen(Screen,0,-l); /* Screen verschieben */ 

Delay(250); /* etwas warten */ 

error(O); /* Programmende ohne Fehlermeldung */ 

1 

Llsting 7. EHB.c demonstriert den Extra-Halfbrite Modus 


Flags, die alle im Headerfile 
»graphicsA/iew.h« (gleich nach- 
sehen!) definiert sind, kann bei¬ 
spielsweise die Grafikaufiö- 
sung festgelegt werden. 

Die Flags, es existieren zur 
Zeit neun, können beliebig mit¬ 
einander kombiniert werden. 
Man sollte jedoch auf die Funk¬ 
tionsfähigkeit der l^mbination 
achten, denn es wird keine 
Plausibilitätskontrolle von Sei¬ 
ten des Betriebssystems durch¬ 
geführt. Hier die möglichen 
Flags: 

»HIRES« ist die Abkürzung 
für »High RESolution« und be¬ 
deutet hohe Auflösung. Dies 
bezieht sich jedoch nur auf die 
horizontale Biidschirmauflö- 
sung. Ist HIRES gesetzt, be¬ 
trägt diese 640 Punkte, anson¬ 
sten die Hälfte, also 320 
Punkte. 

»LAGE« verdoppelt die verti¬ 
kale Auflösung von 256 auf 512 
Punkte. Dies erreicht man 
durch eine besondere Technik, 
die auch beim Farbfernseher 
eingesetzt wird: dem Zeilen¬ 
sprungverfahren. 

Das darzustellende Bild zer¬ 
teilt sich in zwei Halbbilder, 
»LongFrame« und »ShortFra- 
me«. LongFrame wird auf allen 
ungeraden Zeilen (also Zeile 
13.5 etc.), ShortFrame auf allen 
geraden Zeilen (2,4,6 etc.) dar¬ 
gestellt. Die eigentliche Bild¬ 
schirmfrequenz vom 50 Hz ver¬ 
ringert sich dadurch auf 25 Hz 
und kommt somit der Trägheits¬ 
grenze des menschlichen Au¬ 
ges sehr nahe, was sich mit ei¬ 
nem ziemlich starken Flimmern 
bemerkbar macht. 

»SPRITES« müssen Sie set¬ 
zen, wenn Sie auf Ihrem Screen 
Hardware-Sprites darstellen 
möchten. 

»DUALPF« Zwei übergroße 
Grafiken können »übereinan¬ 
der« dargestellt werden. Diese 
Bilder können gegeneinander 
verschoben werden und an 
transparenten Stellen der obe¬ 
ren Grafik wird die untere sicht¬ 
bar. Jedes Playfield kann aus 
maximal drei Bit-Ebenen beste¬ 
hen, so daß sich für jedes acht 
Farben ergeben. Die Farbregi- 
ster 0 bis 7 sind für das erste, 
die Register 8 bis 15 für das 
zweite Playfield zuständig, wo¬ 
bei die Farben 0 und 8, also die 
jeweils ersten eines Playfields, 
transparent sind. Wer sich für 
diesen interessanten Darstel¬ 
lungsmodus interessiert, sollte 
sich unser Demoprogramm auf 
Seite 145 (»Doppeltes Spiel«) 
anschauen. 

»EXTRA_HALFBRITE« 
bringt zum ersten Mal die sech¬ 
ste Bit-Ebene ins Spiel. Obwohl 
uns im »LoRes«-Modus nur 32 
Farbregister zur Verfügung ste¬ 


hen, können wir im EXTRA_ 

HALFBRITE-Modus 64 Farben 
ansprechen und darstellen. Be¬ 
achten Sie hierzu auch Listing 7 
(EHB.c). Addieren Sie zu einer 
Farbregisternummer den Wert 
32, wird deren nach rechts ver¬ 
schobener Inhalt als Farbe dar- 
gestellt. Die Farben 32 bis 63 
entsprechen also den Farben 0 
bis 31, sind jedoch nur halb so 
hell. Vermutlich leitet sich so 
der etwas merkwürdig klingen¬ 
de Name dieses Flags ab. 

Um die Farben der Farbregi¬ 
ster festzulegen, existiert in der 
Grafik-Bibliothek eine Routine 
namens »SetRGB40«. Hier der 
Aufruf: 

SetRGB4(VP,FR,rot,grün, 
blau); 

»VP« ist ein Zeiger auf die 


ViewPort-Struktur (siehe un¬ 
ten). »FR« ist die Nummer des 
Farbregisters, dessen Inhalt 
sich verändern soll. Die Para¬ 
meter »rot«, »grün« und »blau« 
repräsentieren die Farbanteile, 
aus denen sich die Farbe zu¬ 
sammensetzt. 

Der Farbtopf 

Erlaubt sind Werte von 0 bis 
15 für jeden Farbanteil. Es han¬ 
delt sich hier, wie beim Sonnen¬ 
licht, um eine additive Farbmi¬ 
schung, das heißt die Maximal¬ 
werte der drei Grundfarben er¬ 
geben weiß. 

In der Hauptfunktion unseres 
EHB-Demos definiert SetRG 
B40 32 Farben innerhalb einer 
Schleife. Wir lernen später 
noch eine andere Funktion ken¬ 


nen, mit deren Hilfe man die 
komplette Palette eines 
Screens festlegen kann. 

Wenn wir schon dabei sind, 
die Anzahl der zur Verfügung 
stehenden Farbenpracht auf 
die Spitze zu treiben, wie wäre 
es mit 4096 Farben? 

Dies ist tatsächlich realisier¬ 
bar, allerdings ■> wie der »EX- 
TRA_HALFBRITE«-Modus - 
nur in der niedrigen Auflösung 
und mit Hilfe der sechsten Bit¬ 
plane. Eine weitere Einschrän¬ 
kung besteht darin, daß die Far¬ 
be eines gesetzen Punktes, zu 
einem Drittel von der Farbe des 
linken Nachbarpunktes abhän¬ 
gig ist. HAM bedeutet nichts an¬ 
deres als »Hold And Modify« 
(halte und verändere). Im Klar¬ 
text: zwei Anteile einer Farbe 
bleiben bestehen und der dritte 
wird verändert. Welchen der 
drei Anteile einer Farbe, rot, 
grün oder blau. Sie verändern 
möchten, teilen Sie mit den Bit- 
Ebenen 5 und 6 mit. Tabelle 5 
zeigt die möglichen Kombina¬ 
tionen. Sind beide Bits auf 0 ge¬ 
setzt, wird die Nachbarfarbe 
unverändert übernommen. 

»PFBA« Wie im Dual-Play- 
field-Modus wird auch hier mit 
zwei hintereinanderliegenden 
Screens gearbeitet. Allerdings 
müssen diese im PFBA-Modus 
gleich groß sein. Während die 
Grafik der vorderen Bitmap 
sichtbar ist, kann beispielswei¬ 
se eine andere unsichtbar im 
Hintergrund aufgebaut werden. 
So entstehen zum Beispiel bei 
Flugsimulatoren, trotz der rela¬ 
tiv komplexen Grafik, fließende 
Bewegungen. Man nennt diese 
Technik »Double Buffering«. 

»GENLOCK_VIDEO« er¬ 
setzt die Hintergrundfarbe 
durch das Signal des Genlock- 
Video-Interface. Endlich brau¬ 
chen Sie nicht mehr auf »Wet¬ 
ten daß« zu verzichten, wäh¬ 
rend Sie den neuen C-Kurs 
durcharbeiten! 

»VP-HIDE« In diesem letzten, 
etwas kuriosen Modus, wird der 
Screen nicht dargesteilt. 

Type ist die nächste Variable 
der NewScreen-Struktur. Wenn 
Sie Ihren ganz persönlichen 
Screen öffnen möchten, setzen 
Sie hier das Flag »CUSTOM- 
SCREEN«. Mit »WBENCH- 
SCREEN« erhalten Sie eine Ko¬ 
pie des Workbenchscreen. Das 
hat den Vorteil, daß darauf die 
Systemmeldungen, die Ihnen 
der Amiga mittels Requester 
überbringen möchte, sichtbar 
sind. Bei der VenA/endung eines 
Customscreens schaltet sich, 
wenn der Bediener Ihres Pro¬ 
gramms zum Beispiel die nicht 
vorhandene Diskette in Lauf¬ 
werk DFO: ansprechen möchte, 
der im Hintergrund liegende 


Die Wirkung der 5. und 6. 
Bitebene bei HAM 


Ebene 5 Ebene 6 modifizierter Bitnummer Im 

Anteil Farbregister 


0 

0 

_ 

_ 

0 

1 

blau 

0 bis 3 

1 

0 

rot 

8 bis 11 

1 

1 

grün 

4 bis 7 


Tabelle 5. Im HAM-Modus entscheiden die Bit-Ebenen 5 und 
6, welcher Farbanteil modifiziert werden soll 
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struct Screer 
{ 

struct Screen «NextSereen; 
struct Window «FirstWindowj 
SHORT LeftEdge, TopEdge; 

SHORT Wldth, Height; 

SHORT MouseY, MouseX; 

USHORT Flags; 

UBYTE »Title; 

UBYTE »DefaultTitle; 

BYTE BarHelght, BarVBorder, BarHBorder; 

BYTE MenuVBorder, MenuHBorder; 

BYTE WBorTop, WBorLeft, WBorRlght, WBorBottom; 

struct TextAttr »Font; 

struct ViewPort ViewPort; 

struct RastPort RastPort; 

struct BitMap BitHap; 

struct Layer_Info Layerlnfo; 

struct Gadget »FirstGadget; 

UBYTE DetailPen, BlockPen; 

USHORT SaveColorO; 
struct Layer »BarLayer; 

UBYTE »ExtData; 

UBYTE »UserData; 

) i 

Listing 5. Die Screen-Struktur enthält wichtige 
Informationen über einen bereits geöffneten Screen 


Workbenchscreen mit dem ent¬ 
sprechenden Requester nach 
vorne. Wenn Sie dem Anwen¬ 
der Ihres Programms nicht zu¬ 
muten wollen, daß er den Work¬ 
benchscreen selbst wieder 
nach hinten klickt, muß Ihr Cu- 
stomscreen vom Programm 
aus wieder nach vorne ge¬ 
bracht werden. 

Es besteht auch die Möglich¬ 
keit, sich ein komplett eigenes 
Display zu erstellen. Sie müs¬ 
sen dann eine eigene BitMap 
Struktur definieren (siehe Li¬ 
sting 15) und hier, unter Type, 
das Flag »CUSTOMBITMAP« 
setzen (Beachten Sie aber, daß 
diese Bitmap auch mit der 
Screen-Struktur verknüpft wer¬ 
den muß). 

Fonts Diese Variable erwar¬ 
tet einen Zeiger auf eine Text 
Attr-Struktur. Sie können so ei¬ 
nen beliebigen Zeichensatz 
verwenden. Ist man jedoch mit 
dem eingestellten Zeichensatz 
zufrieden, so setzt man Fonts 
gleich NULL 

Die TextAttr-Struktur ist sehr 
einfach aufgebaut, wir werden 
uns später intensiv damit befas¬ 
sen. Ganz besonders Neugie¬ 
rige verweisen wir auf das 
Headerfile »graphics/text.h«. 

Title Hier können Sie den 
Text, der später in der Titelleiste 
des Screens erscheinen soll, 
eintragen. Wünschen Sie kei¬ 
nen Screen-Titel, so geben Sie 
einfach NULL ein, 

Gadgets Diese Variable ist 
zur Zeit noch ungenutzt, wes¬ 
halb sie immer auf NULL ge¬ 
setzt sein sollte. 

CustomBitMap, die letzte 
Variable der NewScreen-Struk- 
tur, erwartet einen Zeiger auf ei¬ 
ne selbstdefinierte BitMap- 
Struktur. Eine BitMap ist eine 
Datenstruktur, die die Speicher¬ 
bereiche der Bit-Ebenen ent¬ 
hält. Wenn Sie mit einer selbst¬ 
definierten BitMap-Struktur ar¬ 
beiten möchten, muß das Flag 
»CUSTOMBITMAP« der Varia¬ 
blen Type (siehe oben) gesetzt 
sein. 

Definieren Sie CustomBit¬ 
Map als NULL, wenn Sie lieber 
keine eigene BitMap-Struktur 
definieren wollen. Achten Sie 
darauf, daß in diesem Fall die 
Variable Type der NewScreen- 
Struktur nicht auf CUSTOMBIT¬ 
MAP gesetzt ist. 

Wenn Ihnen die Datentypen 
der Variablen innerhalb der 
NewScreen-Struktur etwas 
merkwürdig erscheinen, sollten 
Sie sich einmal das Headerfile 
»exec/types.h« anschauen. 
Dort sind alle speziellen Amiga- 
Datentypen definiert. Es han¬ 
delt sich jedoch nicht um gänz¬ 
lich neue Typen, sondern den 
Standard-Datentypen wurden 


neue Namen verliehen. Es 
steht nichts im Wege, Ihr gelieb¬ 
tes »short« anstelle des neuen 
»COUNT« weiterzuverwenden. 

Der erste 
eigene Screen 

Ob Sie die einzelnen Kompo¬ 
nenten der NewScreen-Struk¬ 
tur durch eine statische Initiali¬ 
sierung oder innerhalb einer 
Funktion per Auswahloperator 
mit Werten bestücken, bleibt Ih¬ 
nen überlassen. In unserem 
Headerfile TOOL.h geben wir 
der letzteren Methode den Vor¬ 
zug. 

Es hält uns aber in jedem Fal¬ 
le nichts mehr auf, unseren er¬ 
sten eigenen Screen zu öffnen, 
Dabei hilft uns die Intui¬ 
tion-Funktion OpenScreenO- 
OpenScreen(&NewScreen); 

Als Parameter dient ein Zei¬ 
ger auf die NewScreen-Struk¬ 
tur, die das Aussehen des ge¬ 
wünschten Screens definiert. 
Als Returnwert liefert diese 
Funktion einen Zeiger auf eine 
weitere Struktur - die Screen 
Struktur (Listing 5). 

Wie das Öffnen einer Library, 
erfolgt das Öffnen eines 
Screens immer nach dem glei¬ 
chen Schema, eine Automati¬ 
sierung mit Hilfe einer geeigne¬ 
ten Routine bietet sich an. Die 
erste Intuition-Funktion in 
Tool.h zeigt die fertige Lösung. 
GetScreenQ übernimmt für 
uns die Initialisierung der 
NewScreen-Struktur und das 
Öffnen des neuen Screens. 

Als Parameter dienen Top¬ 
Edge, Depth, ViewModes und 


DefaultTitle. Die anderen Varia¬ 
blen der Struktur erhalten gän¬ 
gige oder, wie Width und 
Height, errechnete Werte. So¬ 
mit gestaltet sich der Funktions¬ 
aufruf denkbar einfach: 

GetScreen(t,d,m,ti ); 

Die Funktion liefert die Adres¬ 
se einer Screen-Struktur. Mit 
dieser Struktur befassen wir 
uns noch im Anschluß ausführ¬ 
lich. Zuvor jedoch hat unsere 
Funktion noch in Listing 6 den 
ersten Test zu bestehen. Wir 
fordern gleich drei Bildschirme 
an und noch dazu mit unter¬ 
schiedlichen Auflösungen. Je¬ 
der der drei GetScreenQ-Aufru- 
fe liefert die Adresse auf die 
Struktur des gerade zu öffnen¬ 
den Screens. Wir weisen diese 
Werte den globalen Zeigern 
Screeni, ScreenZ und Screen3 
zu. Nach dem Öffnen der benö¬ 
tigten Libraries werden nach¬ 
einander die drei Bildschirme 
geöffnet. 

Sollten die Libraries oder ei¬ 
ner der Screens nicht zu öffnen 
sein, so erfolgt in der Funktion 
»errorO« eine Fehlermeldung. 
Alle Screens und Libraries wer¬ 
den dort in umgekehrter Rei¬ 
henfolge geschlossen. 

Eine unbekannte Funktion 
schließt sich an. Delay(n) verzö¬ 
gert den Programmablauf um 
n/50 Sekunden. Lassen Sie das 
Bild dieser drei Screens ein we¬ 
nig auf sich wirken. Ein Bild¬ 
schirmblitz holt Sie in die Wirk¬ 
lichkeit zurück. Haben Sie be¬ 
merkt, daß nur der mittlere 
Screen geblinkt hat? Als Para¬ 
meter von DisplayBeepO diente 
der Zeiger auf die Screen- 
Struktur des mittleren Bild¬ 


schirms Screen2. Jetzt wird 
auch die Bedeutung dieses Zei¬ 
gers klar: mit seiner Hilfe kann 
ein Screen wie mit einem Na¬ 
men angesprochen werden. 
Dies ist auch bei der nächsten 
Funktion der Fall: CloseSc- 
reen(Screenl) schließt einzig 
und allein den Screen mit der 
zugehörigen Struktur mit der 
Adresse »Screeni«. 

Nacheinander, mit einer kur¬ 
zen Verzögerung, werden zu¬ 
erst alle Screens und dann die 
Libraries geschlossen. 

Vielleicht sollten wir, bevor 
wir die Screen-Struktur bespre¬ 
chen, einige Screen-Funktio- 
nen testen? Kein Problem. Die 
Variable »s« sei als Zeiger auf 
die Screen-Struktur definiert 
(struct Screen *s;). Die Funktio¬ 
nen OpenScreenO und Clo- 
seScreenO sind bereits bespro¬ 
chen, in diesem Zusammen¬ 
hang interessieren zwei 
Workbench-Funktionen: 

CloseWorkbench(); 
OpenWorkbenchO ; 

Der Workbenchscreen wird 
geschlossen beziehungsweise 
geöffnet. Beide Funktionen lie¬ 
fern den Wert 1 (True) wenn al¬ 
les geklappt hat und 0 im ande¬ 
ren Fall. Parameter benötigen 
beide nicht. 

MakeScreen(s); 

Ein bereits geschlossener 
Screen, dessen Zeiger noch 
besteht, kann mit Hilfe dieser 
Funktion gerettet werden. Die 
Eingliederung des Screens in 
die Copperliste erfolgt im An¬ 
schluß durch den Aufruf der 
Funktion RethinkDisplayO. 

RemakeDisplayO frischt mit 
Hilfe dieser beiden Funktionen 
das gesamte Intuition-Display 
neu auf. Zuerst erfolgt mit je¬ 
dem Screen der Aufruf von Ma- 
keScreenQ. Im Anschluß daran 
aktualisiert RethinkDisplayO 
die Copperliste. 

fehler=GetScreenData 
(puffer,anzahl,type, 
screen); 

Diese Funktion kopiert eine 
Anzahl (»anzahl«) von Daten in 
einen im RAM gelegenen Puf¬ 
fer (»puffer«). Der Typ (»type«) 
kann »CUSTOMSCREEN« oder 
»WBENCHSCREEN« sein. 

Geben Sie WBENCH¬ 
SCREEN als Type an, wird das 
vierte Argument ignoriert. Im 
anderen Fall steht dort der Zei¬ 
ger auf eine Screen-Struktur. 
Die Funktion kehrt im Fehlerfal¬ 
le mit 0 zurück. 

MoveScreen(s, px, py)j 

Der Screen »s« wird »py« 
Punkte verschoben. Durch die 
Angabe von positiven Werten 
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verschiebt sich der Bildschirm 
mit Inhalt nach unten, eine Be¬ 
wegung nach oben erreichen 
Sie durch die Angabe von ne¬ 
gativen Werten. Da ein Screen 
nicht in X-Richtung verschoben 
werden kann, hat »px« zur Zeit 
noch keine Bedeutung. 

ScreenToBack(s); 

Diese Funktion schattet den 
Screen s hinter alle anderen, zu 
diesem Zeitpunkt geöffneten 
Screens. Das Gegenstück da¬ 
zu ist ScreenToFront(s). 

ScreenToFront(s); 

Screen »s« wird als »vorder¬ 
ster« Screen dargesteilt. Auch 
den Workbenchscreen können 
Sie nach vorne oder nach hin¬ 
ten schalten. Hierzu dienen die 
Funktionen WBenchToBackO 
und WBenchToFrontQ. Beide 
benötigen keine Parameter und 
liefern den Wert 1 (TRUE) wenn 
alles geklappt hat oder 0 wenn 
nicht. 

ShowTitle(s,modus); 

Entscheiden Sie mit 1 oderO 
als Modus, ob der Screen Titel 
auf einem Backdrop-Window 
(Kapitel Windows) erscheinen 
soll (1) oder nicht (0). 

Zum Schluß soll noch etwas 
Farbe ins Spiel. SetRGB40 ha¬ 


ben Sie bereits kennengelernt. 
Die Funktion 

LoadRGB4(&VP,^Palette, 

n); 

erlaubt die Definition mehrerer 
Farben auf einmal. VP ist dabei 
die Adresse des ViewPorts und 
n die Anzahl der Farbregister, 
die Sie verändern möchten. Pa¬ 
lette ist die Adresse eines 
WORD-Arrays, welches die 
Farbwerte, »n« Stück an der 
Zahl, enthält. Das Gegenstück 
zu SetRGB40 heißt GetRGB4 
(&CM,nr}. Die Funktion liest 
den Wert nr aus der ColorMap 
CM und liefert den Wert des 
Farbregisters. Die ColorMap 
finden Sie in der ViewPort- 
Struktur: »ViewPort.ColorMap«. 
Die einzelnen Farben In R, G 
und B muß sich der Anwender 
selbst errechnen - oder einfach 
Tool.h verwenden, denn da ist 
eine Funktion definiert, die das 
übernimmt. 

nr=GetCol(&VP,nr, &r, 

Die Funktion liefert, ebenso 
wie GetRGB4(), den Inhalt des 
Farbregisters »nr«. Darüber hin¬ 
aus werden aber noch die Va¬ 
riablen r, g und b, deren Adres¬ 
sen Sie übergeben, mit den 
Rot/Grün/Blau-Werten belegt. 


Der Aufruf Ist dem von Set 
RGB40 angepaßt. Daher Ist VP 
die Adresse des ViewPorts und 
nr, wie erwähnt, die Nummer 
des Farbregisters. 

Testen Sie ruhig einmal alle 
Funktionen, bevor es jetzt mit 
der Screen-Struktur weitergeht. 


Immer aktuell - 
die Screen- 
Struktur 

Nachdem Sie den »Antrag« 
(NewScreen-Struktur) für einen 
neuen Bildschirm abgegeben 
haben, erhalten Sie ein aus¬ 
führliches »Informationsblatt« 
zurück, die Screen-Struktur (Li- 
sting 5). Die einzelnen Varla¬ 
bleninhalte der Struktur kön¬ 
nen Sie wie gewohnt mit dem 
Inhaltsoperator lesen: 

struct Screen 
SHORT xpos; 

xpos=S“> *MouseX; 

In diesem Fragment übertra¬ 
gen wir die aktuelle x-PosItlon 
des Mauszeigers in die Variable 
xpos. Betrachten wir uns die 
Screendaten etwas genauer: 

NextScreen ist ein Zeiger auf 
den nächsten Screen. So sind 
alle Screens verkettet, wenn 
nur ein einziger bekannt ist, 
kann man per »Durchhangeln« 
mit dem Inhaltsoperator alle 
anderen erreichen. Diese Art 
der Verkettung finden Sie bei 
jeder wichtigen Amiga-Daten- 
struktur. 

Existiert kein Screen mehr, 
enthält NextScreen den Wert 0. 

FirstWindow Hier finden Sie 
einen Zeiger auf das erste Fen¬ 
ster auf dem Screen. Da auch 
alle Windows miteinander ver¬ 
kettet sind, können Sie mit 
dieser Information auch auf 
alle anderen Fenster dieses 
Screens zurückgreifen. 

LeftEdge, TopEdge, Width 
und Height sind die Screenpo- 
sitionen und Screendimensio- 
nen aus der NewScreen- 
Struktur. 

MouseX und MouseY halten 
ständig die Position des Maus¬ 
zeigers parat. Dadurch kann 
diese jederzeit abgefragt wer¬ 
den. Bezugspunkt ist die linke 
obere Ecke des Screens {x=0 
und y=0). 

Flags neben den Flags, die 
Sie selbst in der NewScreen- 
Struktur gesetzt haben, finden 
Sie hier noch »SHOWTITLE« 
und »BEEPING«. SHOWTITLE 
verändert sich mit einem Auf¬ 
ruf der Funktion »ShowTitle- 
ScreenO«. BEEPING ist ge¬ 
setzt, wenn der Bildschirm 
blinkt. 


Title ist ein Zeiger auf den 
Titeltext des Screens. 

DefauttTitle ist ein Zeiger auf 
einen Titel für den Fall, daß ein 
Window ohne Screentitel aktiv 
ist. 

Die nächsten Variablen ge¬ 
ben die Abmessungen der Ti¬ 
telleiste für den Screen und die 
darauf befindlichen Windows 
an. 

Font enthält einen Zeiger auf 
die in der NewScreen-Struktur 
gewählte TextAttr-Struktur. 

VIewPort. Hier finden Sie ei¬ 
ne weitere kleine Struktur (aus¬ 
nahmsweise nicht den Zeiger 
darauf) - die ViewPort-Struktur. 
Sie enthält unter anderem ei¬ 
nen Zeiger auf den nächsten 
ViewPort, einen Zeiger auf die 
ColorMap, die Dimensionen 
des zu verwaltenden Display¬ 
ausschnittes, Informationen 
über die Bitplanes, die in der 
NewScreen-Struktur festgeleg¬ 
ten ViewModi und verschiede¬ 
ne Listen für den Copper. 

Sie sehen, der ViewPort ist 
maßgeblich an der Gestaltung 
des Displays beteiligt. Ein Dis¬ 
play kann aus einem oder meh¬ 
reren ViewPorts bestehen. 

Dabei ist zu beachten, daß 
diese nicht nebeneinander dar¬ 
gestellt werden können und daß 
zwischen den einzelnen View¬ 
Ports mindestens eine (Pixel-) 
Zelle frei bleiben muß. All dies 
erinnert an den Screen und tat¬ 
sächlich ist es so, daß man den 
Screen einfach nur als den 
sichtbaren Teil des ViewPorts 
bezeichnen könnte. 

RastPort Auch die RastPort- 
Struktur ist in der Screen- 
Struktur nicht als Zeiger, son¬ 
dern höchstpersönlich vertre¬ 
ten. Er enthält, als Verwalter ei¬ 
ner Zeichenebene, verschiede¬ 
ne Zeiger auf Grafikgrundele¬ 
mente, wie beispielsweise die 
Layerstrukturen oder die Bit- 
mapstrukturen. Weiter findet 
man dort die Vorder- und Hin¬ 
tergrundfarbe, die Zeichen- und 
Zeichensatzmodi, die Position 
und Maße des Grafikcursors 
und vieles mehr. Wir kommen 
im Zusammenhang mit den 
Windows noch einmal auf den 
RastPort zu sprechen. 

BitMap An dieser Stelle Ist 
die Datenstruktur abgelegt, die 
die Adressen der Speicherbe¬ 
reiche des Screens, der Bit- 
Ebenen, beinhaltet. 

Layerlnfo ist eine weitere Da¬ 
tenstruktur der Screen-Struk¬ 
tur. Sie informiert über die soge¬ 
nannten Layers, die Grundele¬ 
mente der Amiga-Windows. 

FirstGadget Für den Screen 
existieren bisher nur die beiden 
Systemgadgets. Mit dem ersten 
kann man ihn nach vorne oder 
in den Hintergrund klicken, mit 


/• 

\ \ 3SDerao.c - Demo mit drei Screens 
*/ 

#lnolude 'TOOL.h' 

struct Screen »Screenl, *Screen2, *Screen3j 
VOID error(meldung) 

STRPTR meldung; 

( /« Fehlermeldung ausgeben und Programm beenden »/ 
printfC'S nKann Js nicht bffnen!\ n",meldung); 
if(Screen3) Clo8eScreen(Screen3}; 
if(Screen2) CloseScreen(SoTeen2); 
if(Screenl) CloseScreen(Soreenl); 

CloaeLibO; 

exit(O); 

I 

VOID mainO 
( 

if(0penLib())( /» Libraries öffnen »/ 
error('Libraries') 5 
] 

lf(l(Screenl*GetScreen(50,2,UCE,'UCE')))( /* Screen öffnen »/ 
error("LACE-Screen'); 

) 

lf(I(Screen2=GetScreen(100,2,HIRES,"HIRES')))! 
error{ "HIRES-Screen'); 

] 

if(I(Screen3=GetScreen(400,2,HIRESlUCE."HIRESlLACE')))( 
error ( 'HIRESlUCE-Screen "); 

] 

Delay(200); /* ca. 4 Sekunden warten ... */ 

DisplayBeep(Screen2); /* Blldschlrrablltz */ 

Delay(50); 

CloseScreen(Screenl); /* Screen schließen */ 

Delay(50)i 

CloseSoreen(Sereen2); 

Delay(50); 

CloseScreen(Screen3); 

CloseLlbO; /* Libraries schließen */ 

} 

Listing 6. Das »Screendemo« öffnet drei verschiedene 
Screens 
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dem anderen in der Y-Richtung 
frei verschieben. In einer späte¬ 
ren Version des Betriebssy¬ 
stems wird hier der In der 
NewScreen-Struktur vereinbar¬ 
te Zeiger auf das erste Benut- 
zergadget zu finden sein. 

Detail- und BlockPen sind 
ebenfalls in der NewScreen- 
Struktur definiert. 

SaveColorO Hier sichert In¬ 
tuition die Hintergrundfarbe 
(Farbregister 0) während eines 
Bildschirmblitzes. 

BarLayer ist ein Zeiger auf 
die Layer-Struktur der Titellei¬ 
ste. 

Ext- und UserData enthalten 
Zeiger auf eigene Daten, die 
den Screen betreffen. 

Doch vorerst genug der grau¬ 
en Theorie. Bevor es mit den 
Windows weitergeht, wollen wir 
unser Wissen über Screens 
noch mit einigen Übungen ver¬ 
tiefen. 

Auch auf den folgenden Sei¬ 
ten werden Sie nach jedem grö¬ 
ßeren Kapitel auf solche Übun¬ 
gen treffen. So können Sie 
selbst Ihren Wissensstand kon¬ 
trollieren und wenn nötig noch 
vertiefen. Zuerst untersuchen 
wir gemeinsam den Extra-Half- 
brighte-Screenmodus. In die¬ 
sem Modus stehen 64 Farben 
zur Verfügung. Um diese auch 
auf dem Bildschirm sichtbar zu 
machen, müssen wir etwas vor¬ 
greifen und zwei noch nicht be¬ 
sprochene Grafikroutinen be¬ 
nutzen; 

SetAPen(RP,col); 

RectFlll(RP,xl,yl, 

x2,y2); 

SetAPenQ legt die Zeilenfar¬ 
be (col) für den angegebenen 
RastPort (RP) fest. Die andere 
Funktion, RectFillO. zeichnet im 
RastPort RP ein mit der eben 
festgelegten Farbe gefülltes 
Rechteck mit den angegebe¬ 
nen Koordinaten. Mehr über 
diese Funktionen erfahren Sie 
weiter unten im Grafikteil. 

Beleuchten wir nun unser 
»EHB-Demo« (Listing 7) etwas 
genauer: Nachdem Tool.h ein¬ 
gebunden ist, erfolgt die Verein¬ 
barung zweier Symbole. VP ist 
die Adresse der ViewPort Struk¬ 
tur, RP die der RastPort- 
Struktur des Screens. Die 
Klammern sind in beiden Fällen 
nicht unbedingt notwendig. 

Der Zuweisungsoperator 
(->) hat ohnehin die höhere 
Priorität gegenüber dem Adreß- 
operator (&). Sie verdeutlichen 
dem Leser Ihres Programms, 
daß hier ausdrücklich die 
Adresse der jeweiligen Struktu¬ 
ren verlangt wird. 

In der Hauptfunktion mainQ 
öffnen wir die Libraries und den 
Screen. Falls hierbei ein Fehler 


auftreten sollte, gibt »errorO« ei¬ 
ne Fehlermeldung aus und 
bricht das Programm ab. 

Es folgen in mainQ zwei »for«- 
Schleifen. Inder ersten belegen 
wir die 32 Farbregister des 
Screens mit Werten. Im Rumpf 
der nächsten Schleife zeichnen 
wir 32 Rechtecke mit Screenhö- 
he, in den Farben 0 bis 31 und 
weitere 32 Rechtecke, in die 
Screenmitte, in den Farben 32 
bis 63. Der Screen ist jedoch 
noch nicht sichtbar. Denn beim 
Öffnen legte die Variable ypos 
dessen oberes Ende auf die Po¬ 
sition 256. Erst jetzt sorgt »Mo- 
veScreenO« in einer »while«- 
Schleife für eine kontinuierliche 
Bewegung des Screens von un¬ 
ten nach oben. Zum Abschluß 
werden, nach einer kleinen 


Neben dem Screen stellt uns 
Intuition noch einen weiteren 
elementaren und zugleich flexi¬ 
blen Baustein zur Verfügung; 
gemeint ist das Window. Win¬ 
dows auf einem Screen lassen 
sich in gewisser Weise mit lo¬ 
sen Arbeitsblättern auf einem 
Schreibtisch vergleichen. So 
kann man sie beliebig positio¬ 
nieren oder auch in ihrer Rei¬ 
henfolge verändern. 

Allerdings ist die Größe eines 
Windows, anders als die eines 
Papierbogens, nicht genormt. 
Im Gegenteil, oft kann der An¬ 
wender sein Arbeitsfeld sogar 


Pause, Screen und Libraries 
geschlossen. Versuchen Sie 
doch jet 2 rt einmal, einen eige¬ 
nen Screen zu öffnen, oder so¬ 
gar zehn Stück, jeder mit einer 
anderen Farbenpalette. In der 
Titelleiste könnten die Screens 
durchnumeriert sein. 

Streichen Sie die DeiayQ- 
Funktion in EHB.c und ersetzen 
Sie sie durch eine Routine, die 
wartet, bis der Anwender den 
Mauszeiger in die linke obere 
Ecke bewegt. Testen Sie die 
View-Modi. Können Sie mehr 
als 64 Farben auf einen Screen 
bringen? Verändern Sie die be¬ 
sprochenen Programme nach 
eigenen Wünschen, experi¬ 
mentieren Sie damit. Sie wer¬ 
den über die Ergebnisse über¬ 
rascht sein. 


nach Bedarf vergrößern oder 
verkleinern. Nehmen wir als 
Beispiel das CLI-Window. Die¬ 
ses ist mit vier sogenannten Sy- 
stemgadgets ausgerüstet (sie¬ 
he Bild 2). Mit Hilfe des ersten 
Gadgets, der Titelleiste, auch 
»Dragbar« genannt, läßt sich 
das CLI-Fenster nach Wunsch 
verschieben. 

Das rechte Ende der Titellei¬ 
ste bilden die beiden Tiefen- 
gadgets. Per Mausklick verän¬ 
dert man die Reihenfolge der 
Windows, ln der rechten un¬ 
teren Ecke schließlich, ist das 
»WINDOWSIZE«-Gadget mon¬ 
tiert, von wo aus Sie Ihr CLI- 
Fenster auf die gewünschte 
Größe »ziehen« können. 

Im CLI geben Sie Befehle 


über die Tastatur ein. Amiga- 
DOS führt diesen Befehl aus 
oder quittiert eine falsche Ein¬ 
gabe mit einer entsprechenden 
Fehlermeldung. Sie sehen dar¬ 
an, daß auch die Ein- und Aus¬ 
gaberoutinen über die Win¬ 
dows laufen. Man bezeichnet 
sie daher gelegentlich als die 
Schnittstelle zum Anwender. 

Mit dem CLI-Kommando 
»NewCLI« kann man vom CLI 
aus weitere Fenster öffnen. Die 
Anzahl ist nur vom zur Verfü¬ 
gung stehenden Speicherplatz 
abhängig. 

Dem Programmierer stellt 
das Betriebssystem grundsätz¬ 
lich zwei Möglichkeiten zur 
Auswahl, um ein eigenes Fen¬ 
ster vom Programm aus zu öff¬ 
nen. Die eine Möglichkeit führt 
über Intuition, mit der Funktion 
OpenWindowQ. Die zweite 
Möglichkeit nutzt eine Beson¬ 
derheit des AmigaDOS, die 
Verwaltung sogenannter Fen¬ 
ster-Devices über das Device 
»CON:«. Betrachten wir zu¬ 
nächst einmal Möglichkeit 
Nummer 2. 

Listing 8 zeigt, wie einfach 
vom Programm aus ein neues 
CLI-Fenster geöffnet wird, wir 
brauchen noch nicht einmal un¬ 
ser Tool. Das fertig compilierte 
Programm öffnet ein neues 
CLI-Fenster und führt darin den 
eventuell mitgegebenen Kom¬ 
mandoparameter als CLI-Kom¬ 
mando aus; Beispiel; 

CLI dir 

Die Funktion »OpenQ«, mit 
den beiden Parametern »File¬ 
name« und »Modus«, öffnet uns 
dieses Fenster automatisch, 
wenn wir es mit dem Filenamen 
»CON:« ansprechen. CON: ist 
zuständig für Bildschirm und 
Tastatur und somit für uns ge¬ 
nau das Richtige: 

FH=0pen("CONrX/Y/B/H/T; 
Modus); 

Hinter der Angabe »CON:« 
sind die gewünschte Fenster¬ 
position (X und Y), dessen Di¬ 
mensionen (B und H für Breite 
und Höhe) und der Text für die 
Titelleiste aufgeführt. 

Die möglichen Modi, die als 
zweiter Parameter folgen, sind 
im Headerfile »libraries/dos.h« 
festgelegt. Wir verwenden hier 
»MODE_NEWFILE«, da wir 
mit »OpenO« ein neues »Bild¬ 
schirm-File« sprich AmigaDOS- 
Window öffnen möchten. 

»OpenO« kehrt, wenn alles 
klappt, mit einem Zeiger auf ei¬ 
ne FileHandle-Struktur zurück. 
Diese Struktur repräsentiert die 
gerade geöffnete Datei, in un¬ 
serem Fall also das neu geöff¬ 
nete Fenster. Im Fehlerfalle lie¬ 
fert die Funktion den Wert 0. 
Der nun folgene Start von »Exe- 



Bild 2. Die Lage eines Windows mit den fünf Systemgadgets 
auf einem Screen 
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/* 

\\ CLI-Window öffnen 
*/ 

#include <librarles/dos.h> 

VOID main(argc,argv) 
int arge; 
char *argv[]; 

{ 

struct FlleHandle *FHj 

FH=0pen( 'CON:0/0/639/100/CLI-Windov',MODE_NEMFILE); 
E*ecute((argo>l?argv[l]:") ,FH,0); 

Close(FH); 


Listing 8. Die Funktion OpenQ öffnet ein einfaches 
CLI-Window 


cuteQ« führt das beim Aufruf 
mitgegebene CLI-Kommando 
aus. Voraussetzung ist aller¬ 
dings, daß sich im Verzeichnis 
C Ihrer Systemdiskette das File 
»RUN« befindet. Execute ver¬ 
langt drei Parameter: 

Execute(&K,&FH_in, 
&FH_out); 

»K« steht für den Zeiger auf 
den Namen des CLI-itomman- 
dos, welches »ExecuteQ« star¬ 
ten soll. Natürlich könnte an 
dieser Stelle auch ein gewöhnli¬ 
cher Filename stehen. »FH_ 

in« und »FH_out« sind Zeiger 

auf die FileHandie-Struktur des 
Ein- beziehungsweise Ausga¬ 
befiles (oder -Einheit). Wir kom¬ 
men zu einem späteren Zeit¬ 
punkt noch einmal auf Execu- 
te() zurück. 

Die Funktion »CloseQ« 
schließt das Fenster erst, wenn 
man über die Tastatur das Kom¬ 
mando »EndCLI« eingibt. Auch 
dieses, auf einfachste Art er¬ 
zeugte Window, kann vom Be¬ 
diener verschoben, verkleinert 
und vergrößert werden, ohne 
daß wir dies im Programm be¬ 
rücksichtigen mußten. Die Ver¬ 
waltung der vier besprochenen 
Gadgets übernimmt Intuition 
selbst. 

Es existiert jedoch noch ein 
fünftes Systemgadget, das Clo- 
seGadget. Es befindet sich, 
wenn aktiviert, in der linken 
oberen Ecke des Windows. In¬ 
tuition schließt jedoch ein Fen¬ 
ster mit CloseGadget nicht 
selbständig, sondern teilt ledig¬ 
lich dem Programm mit, wenn 
der Anwender das Gadget an- 
wähit. Diese Benachrichtigung 
geschieht über den sogenann¬ 
ten »MessagePort«, abgekürzt 
IDCMP. Doch hierzu lesen Sie 
weiter unten mehr. 

Intuition benötigt, wie beim 
Screen auch, eine besondere 
Struktur, um ein Window kor¬ 
rekt verwalten zu können. Die¬ 
se Window-Struktur enthält alle 
wichtigen Daten eines Win¬ 
dows und wird ständig aktuali¬ 


siert. Wie wir gleich noch sehen 
werden, liefert der Aufruf der 
Intuition-Funktion »OpenWin- 
dowQ« einen Zeiger auf diese 
Struktur. Die Window-Struktur 
eines CON:-Fensters müssen 
wir uns jedoch selbst beschaf¬ 
fen. Das Studium der Intuition- 
Base-Struktur zeigt uns eine 
einfache Lösung dieses Pro¬ 
blems für gerade aktive Win¬ 
dows: IntuitionBase enthält 
nämlich unter anderem einen 
Zeiger auf das aktive Window. 
Da unser DOS-WIndow nach 
dem Öffnen aktiv ist, können 
wir diese Information venver- 
ten: 

struct Window *win; 

win=IntuitionBase-> 

ActiveWindow; 

Die Zugriffsmögtichkeit auf 
ein gerade aktives Fenster ist 
so wichtig, daß wir unser Hea¬ 
derfile Tool.h mit der obigen Lö¬ 
sung ergänzt haben. Vor deren 
Verwendung muß natürlich die 
Adresse der IntuitionBase- 
Struktur bekannt sein. Wir prü¬ 
fen das zur Sicherheit in einem 
bedingten Ausdruck. 

Das fertige Makro heißt 
»ACTIVE WINDOW« (siehe 
Listing 1). Da auch der aktive 
Screen in IntuitionBase geführt 
wird, ist es sinnvoll ein gleichar¬ 
tiges Makro auch für Screens 
zu definieren: »ACTIVE_ 
SCREEN«. 

Listing 9 demonstriert die An¬ 
wendung der Makros. Achten 
Sie darauf, daß Sie vor deren 
Verwendung die Funktion 
OpenUbO aufrufen, so daß In¬ 
tuitionBase auch tatsächlich 
bekannt ist. Ansonsten liefern 
ACTIVE WINDOW und ACTI- 
VE_SCREEN einen Nullpoin¬ 
ter. 

Zur Funktion des Pro¬ 
gramms: »Max.c« setzt das akti¬ 
ve Window in die linke obere 
Bildschirmecke und bringt es 
auf die durch den Screen be¬ 
grenzte maximale Größe. Mo- 
veWindowO und SizeWindowO 
ersetzen die Funktionen der Sy- 
stemgadgets WINDOWDRAG 


und WINDOWSlZE. Als Para¬ 
meter dienen Werte der 
Screen-Struktur und der Win¬ 
dow-Struktur (siehe unten). 

Das Arbeiten mit AmigaDOS- 
Windows mag für einfache An¬ 
wendungen ausreichen. Ein 
Nachteil ist, daß die Windows 
immer vorgefertigt sind. Nach 
dem Öffnen hat das Fenster 
verschiedene Eigenschaften, 
die vielleicht nicht immer er¬ 
wünscht sind. Andere, wie zum 
Beispiel die Möglichkeit zum 
Arbeiten mit Menüs, fehlen und 
müssen im nachhinein um¬ 
ständlich eingefügt werden. 

Wie weiter oben bereits an¬ 
gedeutet, bietet uns aber das 
Betriebssystem einen Weg, ein 
eigenes, individuelles Fenster 
zu definieren. 

Intuition verlangt hierzu von 
uns lediglich eine Art »Wunsch¬ 
zettel« in Form einer Struktur, in 
der wir das neue Window ge¬ 
nau beschreiben. Sie sind 
durch die Arbeit mit Screens 
bereits mit dieser Arbeitsweise 
vertraut; das Öffnen eines Win¬ 
dows geschieht analog zum 


Öffnen eines Screens. 

Bei einem Window überge¬ 
ben wir der »OpenWindowO«- 
Funktion einen Zeiger auf die 
NewWindow-Struktur. Zurück¬ 
geliefert bekommen wir einen 
Zeiger auf die Window-Struktur. 
Betrachten wir uns die New¬ 
Window-Struktur, also den 
Wunschzettel, in Tabelle 6 et¬ 
was genauer. Einer Komponen¬ 
te dieser Struktur sollten wir be¬ 
sondere Beachtung schenken: 
den IDCMP-Flags (IDCMP 
heißt Intuition’s Direct Commu- 
nication Message Ports). Hier 
ist die eigentliche Verbindung 
zum Anwender unseres Pro¬ 
gramms. Intuition teilt uns alle 
Aktivitäten des Anwenders über 
den Message-Port mit. Da uns 
immer nur bestimmte Nach¬ 
richten interessieren, wie zum 
Beispiel ein Klick auf das Clo¬ 
seGadget, entscheiden wir mit 
Hilfe dieser Flags, welche 
Nachrichten Intuition an das 
Programm senden soll. Falls 
das gewünschte Ereignis ein- 
tritt, setzt Intuition in der Varia¬ 
blen »Class« der IntulMessa- 


/• 

\\ Max - vergrößert das aktuelle Window 
*/ 

#include "TOOL.h" 

VOID mainO 
{ 

struct Window »win; 
struct Screen *scr; 

lf(OpenLib()) puts(''Kann Lib's nicht öffnenlNn'); 
el8e[ 

winsACTIVELWINDOW; 

sersACTIVELSCREENj 

MoveWindow(wln,-{win->LeftEdge),-(win->TopEdge)); 
Si 2 eWindow(win,(ücr->Width)-(win- 8 idth)),((scr->Height)- 
(win->Height))); 

CloseLibO; 

I 

} 

Listing 9. Max stellt das CLI-Fenster auf maximale 
Größe ein 


struct IntuiMessage 
( 

struct Message ExecHessage; /» nur für Exec »/ 

ULONG Class; /* enthält das IDCMP-Flag, z.B. MOUSEMOVE */ 

USHORT Code; /* nähere Beschreibung von Class, z.B. 

SELECTDOWN */ 

USHORT Quallfler;/* Tastenkombinationen (SHIFT,CTRL,ALT,AMIGA, 
REPEAT) */ 

APTR lAddress;/* die Adresse des Nachrichten- 
Objekts, z.B. ein Gadget */ 

SHORT MouseX, MouseY; /* X- und Y-Koordinaten des 

Mauspointers •/ 

ULONG Seconds, Micros;/» die Systemzeit zum Zeitpunkt des 
Ereignisses */ 

struct Window «IDCMPWindow; /* für dieses Window ist die 
Nachricht */ 

struct IntuiMessage »SpecialLink;/» Verbindung zu anderen 
Nachrichten */ 

jj 

Listing 10. Beim Auslesen des IDCMP erhalten wir 
einen Zeiger auf die IntuiMessage-Struktur 
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Die NewWindow-Struktur 


LeftEdge: beschreibt die Position der iinken Fensterseite relativ 
zum Screen. Ein Window muß sich voliständig auf einem Screen be¬ 
finden, kein Teil darf »überstehen«. Daher kommen für LeftEdge nur 
positive Werte in Frage. Bitte Vorsicht: Intuition prüft die Werte der 
NewWindow-Struktur nicht! 

TopEdge: ist der Abstand in Pixel, gemessen von der oberen Kante 
des Screens, auf dem sich das Window befindet. Alle Windows sind 
einem bestimmten Screen zugeordnet. Unter anderem ist zum Bei¬ 
spiel die Auflösung eines Windows von diesem Screen abhängig. Ein 
Wechsel auf einen anderen Screen ist daher nicht so einfach möglich. 

Width: hier erwartet Intuition die Breite des Windows, nicht etwa die 
Position des rechten Fensterrandes auf dem Screen. 

Height; der Wert, der die Höhe des neuen Fensters beschreibt. Die 
bisher besprochenen Werte beschreiben die Lage und die Ausmaße 
eines Intuition-Windows. Bild 2 verdeutlicht, wie die Variablen zu ver¬ 
stehen sind. 

DetailPen; ist der Wert des Farbregisters, welches die Farbe ent¬ 
hält, in der zum Beispiel der Text der Titelleiste ausgegeben wird. Bei 
der Eingabe von -1 übernimmt Intuition die Registerangabe des 
Screens. 

BlockPen; ein weiterer Stift. Dieser ist zum Beispiel für den Balken 
der Titelleiste zuständig. Siehe auch DetailPen. 

IDCMPFIags: Intuition kann uns über einen Messageport mitteilen, 
was der Anwender unseres Programms gerade anstellt. 

Flags: Diese Flags können unter anderem das Aussehen eines 
Windows bestimmen. Wie auch die IDCMPFIags dürfen sie, soweit 
sinnvoll, verknüpft werden. Tabelle 7 beinhaltet und erläutert alle Win¬ 
dowflags. 

FIrstGadget: diese Variable der NewWindow-Struktur enthält ei¬ 
nen Zeiger auf das erste selbstdefinierte Gadget in diesem Window 
(NULL bei einem Window ohne Gadgets). 

CheckMark: verlangt einen Zeiger auf eine Image-Struktur, die ein 
eigenes Menühäkchen enthält oder NULL, wenn das »Systemhäk¬ 
chen« ausreicht. 

Title: die Adresse des Fenstertitels. 

Screen: ein Zeiger auf die Screen-Struktur oder NULL, wenn sich 
das Fenster auf dem Workbenchscreen befinden soll. 

BitMap: die Adresse der Bitmap eines SuperBitMap-Windows. 

MinWidth: enthält die kleinste Breite, auf die der Anwender das 
Fenster ziehen kann. Trägt man 0 ein, so ist Width die kleinste Breite. 

MinHeight: bezieht sich auf die Höhe des Fensters, ansonsten wie 
MinWidth. 

MaxWidth: enthält die größte Breite, auf die der Anwender das Fen¬ 
ster ziehen kann. Intuition nimmt als die größte Breite Width an, wenn 
man 0 einträgt. 

MaxHeight: bezieht sich auf die Höhe des Fensters, ansonsten wie 
MaxWidth. 

Type: hier verlangt Intuition noch einmal den Screentyp. 


Tabelle 6. »Wunschzettel« NewWIndow unter der Lupe 


ge-Struktur (Listing 10) das ent¬ 
sprechende Flag. 

Hier die möglichen IDCMP¬ 
FIags und ihre Bedeutung, in 
der gleichen Reihenfolge wie 
sie im Headerfile »intuition/in- 
tuition.h« definiert sind: 

»SI2EVERIFY« Wenn dieses 
Flag gesetzt ist, gibt Intuition 
ein Signal, wenn der Benutzer 
versucht, die Größe des Win¬ 
dows zu verändern. Intuition 
wartet dann, bis das Programm 
das Signal bestätig^. In der Zwi¬ 
schenzeit kann beispielsweise 
eine Grafik fertig aufgebaut 
oder der neuen Größe ange¬ 
paßt werden. 

»NEWSlZE« Das Programm 
erhält eine Nachricht, wenn die 
Größe des Fensters verändert 
wurde. 

»REFRESHWINDOW« Intui¬ 
tion informiert uns, sobald der 
Fensterinhalt, beispielsweise 
durch ein Pull-Down-Menü, zer¬ 


stört wurde. Dies ist wichtig, 
wenn es sich um ein Fenster 

vom Refreshtyp »SIMPLE_ 

REFRESH« (siehe unten) han¬ 
delt. Das Programm muß dann 
das Fenster selbst neu auf¬ 
bauen. 


»MOUSEBUTTONS« Der 
Anwender hat eine Maustaste 
betätigt. Intuition hält in der Va¬ 
riablen »Code« der IntuiMessa- 
ge-Struktur den Zustand der Ta¬ 
sten genau fest. 

»SELEfJTUP« und »SELECT- 
DOWN« bedeuten, daß die lin¬ 
ke Maustaste gedrückt, bezie¬ 
hungsweise losgelassen wur¬ 
de. Hat man das Windowflag 
»RMBTRAP« gesetzt, zeigt In¬ 
tuition auch die Betätigung der 
rechten Maustaste an. Code 
unterscheidet in diesem Fall 
zwischen »MENUUP« und 
»MENUDOWN«. 

»MOUSEMOVE« Intuition ak¬ 
tualisiert in der IntuiMessage- 
Struktur die X- und Y-Position 
des Mauszeigers bezüglich der 
linken oberen Ecke des Win¬ 
dows. Hat man das Window- 
Flag »REPORTMOUSE« ge¬ 
setzt, erhält man bei jeder 
Mausbewegung die Nachricht 
»MOUSEMOVE« und kann die 
entsprechenden l^ordinaten 
ablesen. Wie wir später noch 
sehen werden, ist dieses Flag 
auch sehr sinnvoll bei der Ver¬ 
wendung von Gadgets. Intui¬ 
tion sendet dann die Position 
des Mauszeigers, bezogen auf 
die linke obere Ecke des Gad¬ 
gets. Die Verwendung des 
MOUSEMOVE-Flags ist etwas 
problematisch, weil die Nach¬ 
richten gepuffert werden. Be¬ 
wegt der Anwender den Maus¬ 
zeiger rasch über den ganzen 
Bildschirm, so strömen eine 
Unmenge von MOUSEMOVE- 
Messages auf das Programm 
ein - und jede muß bearbeitet 
und anschließend mit »Re- 
plyMsgO« beantwortet werden. 

»GADGETDOWN« und 
»GADGETUP« senden ein Si¬ 
gnal, wenn über einem Gadget 
die linke Maustaste gedrückt 
beziehungsweise losgeiassen 
wurde. 

»REQSET« informiert uns 
über das Öffnen eines Reque- 
ster auf dem Window. 

»MENUPICK« Die rechte 
Maustaste wurde betätigt. Die 


Nummer des gewählten Menü- 
Items findet man in der Intui- 
Message-Komponente Code. 
Falls kein Item gewählt wurde, 
enthält Code die Konstante 
»MENUNULL«. 

»CLOSEWINDOW« Überdie- 
ses Flag teilt uns Intuition die 
Anwahl des CloseGadgets mit. 

»RAWKEY« weist darauf hin, 
daß die Tastatur betätigt wurde. 
Die Variable Code der IntuiMes- 
sage-Struktur enthält die Co¬ 
des der vom Benutzer betätig¬ 
ten Tasten. Die Variable Quali- 
fier der gleichen Struktur bein¬ 
haltet Informationen über Ta¬ 
stenkombinationen mit Shift 
oder anderen Funktionstasten. 
In Bild 3 finden Sie alle RAW- 
KEY-Codes der Amiga-Tasta- 
tur. 

RAWKEY: 
Tastatur pur 

Beachten Sie, daß sich die 
Codes der Zifferntasten von de¬ 
nen des Ziffernblocks unter¬ 
scheiden. Dadurch können die¬ 
se Tasten separat angespro¬ 
chen werden. 

»REQVERIFY« Intuition sen¬ 
det diese Nachricht, sobald ein 
Systemrequester geöffnet wer¬ 
den soll und wartet, bis das Pro¬ 
gramm diese Nachricht bestä¬ 
tigt (siehe auch SIZEVERIFY). 

»REQCLEAR«: ein Reque- 
ster wurde geschlossen. 

»MENUVERIFY« Intuition 
möchte ein Pull-Down-Menü 
aufklappen, sendet aber vorher 
diese Nachricht und wartet, bis 
das Programm sie bestätigt 
(siehe auch die anderen 
VERIFY-Flags). 

Eine Besonderheit ist zu be¬ 
achten: Wenn ein Window die¬ 
ses IDCMP-Flag gesetzt hat, so 
empfangen alle Windows auf 
dem gleichen Screen die Nach¬ 
richt MENUVERIFY, bevor das 
Menü aufklappt. Ist das Win¬ 
dow mit gesetztem MENUVE- 
RIFY-Flag aktiv, enthält die Va¬ 
riable Code der IntuiMessage- 
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Bitd 3. Diese Hex-Werte liefert die IntuiMessage-Strukturkomponente Code bet einer 
RAWKEY-Message für die einzelnen Tasten 
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\\ KHaus.e - CLI-Koiamando per Mausklick. Aufrufbeispiel: 

RUN KMaus INFO 
V 

#include "TOOL.h" 

VOID error(ineldung) 

STRPTR meldung; 

( 

if(meldung) prlntf("XsXn*,meldung); 

CloseLibO; 

exit(O); 


VOID nialn(argc,argv) 

SHORT argcj 
STRPTR argv[]j 

struot Window »win; 

ULONG dass; 

USHORT code=0; 

if(argci*2) error('Kein CLI-Koramando?')j 
if(OpenLib{)) error("Kann Lib's nicht öffnenl*); 
win»ACTIVE_WINDOW; /* das gerade aktive CLI-Wlndow »/ 

win->Flagsl »RMBTRAP; /* Klick auf rechte Maustaste abfangen */ 
ModifyIDCMP(win,HOUSEBUTTONS): /» IDCMP-Flags verändern »/ 

while(codeI=KENUUP)[ /* warten auf rechte Maustaste */ 

Uait(l< <win->U8erPort->mp_SigBit); /» warten 
auf Message */ 

classsGetMessage(wln,&code,0,0); 
if((clas8==M0USEBUTT0NS)46(code»-SEIi:CTUP)) Execute 
(argv[l],0,0)j 

) 

wln->Flags =RMBTRAP; /* Urzustand der Window-Flags herstellen */ 
ModifyIDCMP(win,0); /• IDCMP-Flags des 
CLI-Windows zurücksetzen */ 
error{0); 


Listing 11. Nach dem Start von KMaus startet ein 
beliebiges CLI-Kommando per Mausklick. Bitte mit »RUN 
KMaus ‘Kommando’« aufrufen. 


Struktur den vordefinierten 
Wert »MENUHOT«, ansonsten 
»MENUWAITING«. 

Im ersten Fall können Sie das 
Aufklappen des Menüstreifens 
ganz verbieten! Belegen Sie 
hierzu die Variable Code mit 
MENUCANCEL, bevor Sie die 
Nachricht beantworten. 

»NEWPREFS« Der Anwen¬ 
der hat ein oder mehrere Werte 
in Preferences geändert. 

»DISKINSERTED« und »DIS- 
KREMOVED« Eine Diskette 
wurde eingelegt beziehungs¬ 
weise entfernt. 

»ACTIVEWINDOW« und »IN- 
ACTIVEWINDOW« Informiert, 
wenn ein Fenster aktiviert be¬ 
ziehungsweise nicht aktiviert 
ist. 

»DELTAMOVE« Dieses Flag 
arbeitet mit »MOUSEMOVE« 
zusammen. Während MOUSE¬ 
MOVE die Position des Maus¬ 
zeigers bezüglich der linken 
oberen Fensterecke anzeigt, in¬ 
formiert die Kombination der 
beiden Flags über die Differenz 
(Delta) zur letzten Mausposi¬ 
tion. 

»VANILLAKEY« arbeitet wie 
RAWKEY, übersetzt jedoch die 
Keycodes in ASCII-Zeichen. 

»INTUITICKS« Solange das 


Fenster aktiv ist, sendet Intui¬ 
tion laufend dieses Signal, so 
daß man es als einfachen Timer 
einsetzen kann. Diese Nach¬ 
richt wird nicht gepuffert! Intui¬ 
tion sendet erst weiter, wenn ein 
INTUITICK beantwortet ist. 

Wie empfängt man nun eine 
Nachricht von Intuition? Wie 
kommt man an die Adresse der 
IntuiMessage-Struktur? Kein 
Problem, der Betriebssystem¬ 
teil Exec hält passende Funk¬ 
tionen für uns bereit. Die wich¬ 
tigste davon ist ohne Zweifel: 
GetMsg(win-> UserPort); 

Der Parameter ist der Messa¬ 
ge-Port, aus dem die Nachricht 
empfangen werden soll, im Bei¬ 
spiel der UserPort des Win¬ 
dows mit der Adresse »win«. Die 
Funktion liefert einen Zeiger auf 
die IntuiMessage-Struktur. Der 
Aufruf von ReplyMsg(&Messa- 
ge) beantwortet die Nachricht. 
Der von GetMsgO reservierte 
Speicherplatz für die Struktur 
wird wieder freigegeben. 

Wir müssen demnach die 
Struktur vor der Beantwortung 
der Nachricht auslesen und 
Zwischenspeichern. 

Das Empfangen, Auslesen 
und Beantworten einer Messa¬ 


ge haben wir in Tool.h in einer 
Funktion realisiert. Deren Auf¬ 
ruf gestaltet sich denkbar ein¬ 
fach: 

struct Window *w; 

ULONG dass; 

USHORT c,i.q; 

class=GetMessage(&w,&c, 

GetMessageO liest den Mes¬ 
sageport aus und liefert die 
Komponente Class der Intui¬ 
Message-Struktur. Die Funk¬ 
tion erwartet vier Parameter: 

»w« ist der Zeiger auf die 
Window-Struktur des betreffen¬ 
den Windows. Die Variablen c,i 
und q werden in GetMessageO 
mit Werten belegt, weshalb wir 
beim Funktionsaufruf nur die 
Adressen übergeben dürfen. 

Die erste mit dem Wert der 
Message-Variablen Code und 
»q« mit dem von Oualifier. Die 
Variable »i« erhält beim Arbei¬ 
ten mit Gadgets die Gadget-ID. 

Wenn Sie einen der aufge¬ 
führten Werte in Ihrem Pro¬ 
gramm nicht benötigen, geben 
Sie anstelle der Adresse ein¬ 
fach 0 an. Doch wie funktioniert 
GetMessageO? Nach der Ver¬ 
einbarung der notwendigen Va¬ 
riablen, liest GetMsgO 
UserPort des angegebenen 
Windows aus. 

Liegt keine Nachricht an, so 
liefert die Funktion 0 und es er¬ 
folgt der Rücksprung. Im ande¬ 
ren Fall lesen wir die wichtig¬ 
sten Komponenten der Nach¬ 
richt aus, bevor wir sie beant¬ 
worten. Die Funktion kehrt mit 
Class als Returnwert zurück. 
Ein Aufrufbeispiel finden Sie in 
Listing 11. 

Das Programm »KMaus« er¬ 
wartet beim Start einen Kom¬ 
mandoparameter. Nach einem 
Klick mit der rechten Mausta¬ 
ste, führt das Programm diesen 
Parameter als CLI-Kommando 
aus. Das Programmende er¬ 
folgt nach der Betätigung der 
rechten Taste. Das Listing ist 
gut dokumentiert, so daß einige 
wenige Worte zur Erklärung 
ausreichen dürften: 

Nach Prüfung des Komman¬ 
doparameters und Öffnen der 
Libraries verändern wir in 
mainO zwei Parameter des ge¬ 
rade aktiven CLI-Windows. 
RMBTRAP als Windowflag be¬ 
wirkt, daß wir auch Nachrichten 
über die rechte Maustaste emp¬ 
fangen können. 

Die IDCMP-Flags setzen wir 
mit der Funktion Modify- 
IDCMPO neu. Diese Funktion 
verlangt zwei Parameter: ein 
Zeiger auf ein Window und die 
neuen IDCMP-Flags. Die erste 
Funktion im Rumpf der folgen¬ 
den Endlosschleife ist WaitQ. 


Anstatt in einer Schleife ständig 
den Messageport auszulesen, 
warten wir mit dieser Exec- 
Funktion, bis tatsächlich eine 
Nachricht bereitsteht. WaitQ hat 
den Vorteil, daß nicht das Sy¬ 
stem, sondern nur das Pro¬ 
gramm in einen Wartezustand 
versetzt wird. Wir warten also, 
ohne das System zu belasten, 
auf eine Nachricht. Bis diese 
eintrifft, kann der Anwender 
problemlos im CLI (oder einem 
anderen Programm) weiterar- 
beiten. 

Nachdem Sie nun wissen, 
was alles auf den »Wunschzet¬ 
tel« gehört, liegt es an Ihnen, 
diesen auszufüllen. Sie könn¬ 
ten dies mit einer statischen Ini¬ 
tialisierung angehen oder in¬ 
nerhalb einer Funktion jeder 
Komponenten der NewWin- 
dow-Struktur einen Wert zuwei¬ 
sen. 

Wir schlagen Ihnen eine drit¬ 
te Möglichkeit vor. Nutzen Sie 
Tool.h und öffnen Sie in Zukunft 
ein Window mit einem einzigen 
Aufruf: 

struct Window *w; 
struct Screen *s; 

SHORT x,y,w,h; 

ULONG i,f; 

STRPTR t; 
struct Gadget *g; 

w=GetWindow(s,x,y,w,h, 

l.Tjt.g); 

Und jetzt: 
Fenster auf 

Die Parameter der Funktion 
GetWindowO sind: s - die 
Adresse des Screens, auf dem 
das Window erscheinen soll. 
Wünschen Sie den gerade akti¬ 
ven Screen, geben Sie einfach 
NULL an. 

X und y - die Position der lin¬ 
ken oberen Ecke des Windows 
auf dem Screen. 

b und h - Breite und Höhe 
des Windows. 

j - die IDCMP-Flags. 

w - die Windowflags, (siehe 
Tabelle 7) 

t - die Adresse des Window- 
Titels und 

g - der Zeiger auf das erste 
selbstdefinierte Gadget im Win¬ 
dow (falls gewünscht). 

Entsprechend diesen Para¬ 
metern initialisiert GetWindowQ 
die meisten Werte der NewWin- 
dow-Struktur. Die anderen le¬ 
gen wir fest, um den Aufruf un¬ 
serer Funktion nicht unnötig zu 
komplizieren. Die Intuition- 
Funktion OpenWindowO öffnet 
das gewünschte Fenster. Als 
Parameter geben wir die Adres¬ 
se der NewWindow-Struktur 
an. GetWindowO reicht den von 
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\\ Demo.c - demonstriert Aufruf von GetUindow() 

V 

#include 'TOOL.h' 

struct Window »win; 

VOID error(ineldung) 

STRPTR meldung; 

I 

if{neldung) printf("Kann Ss nicht öffnen!\n',nieldung)} 
if{win) CloseWindow(wln); 

CloseLibO; 

exlt(0)j 


VOID mainO 

[ 

ULONG dass; 

if(OpenLlb()) error('Llb's'); 

win=GetWlndow(IfULL,10,20,200,100,INACTIVEWIND0W,ACTIVATE,*Denio*, 

NULL); 

if(win..NULL) errorCWindow"); 

while{olassI=INACTIVEWINDOW)( /* warten bis Window inaktiviert 
ist •/ 

Walt (1 < < win- > UserPort- > nip_SlgBit); 
cless*GetMessage(win, 0 , 0 , 0 ); 

) 

error(O); 


Listing 12. Ein einfaches Beispiel - so wird GetWindowQ 
aufgerufen 


OpenWindowQ gelieferten Zei¬ 
ger an die Window-Struktur des 
neuen Fensters weiter. Konnte 
OpenWindowO das Fenster 
nicht öffnen, erhalten wir den 
Wert 0. 

Listing 12 ist ein einfaches 
Beispiel für den Aufruf der neu¬ 
en Funktion. Schauen Sie es 
sich doch einmal genauer an. 
Interessant ist, neben dem Auf¬ 
ruf der neuen Funktion, wie das 
Programmende ausgelöst wird 
- wissen Sie’s? 

Die von GetMessageQ gelie¬ 
ferte Window-Struktur enthält 
jede Menge wichtiger Informa¬ 
tionen. Listing 13 zeigt das do¬ 
kumentierte Listing dieser 
Struktur. Wenn noch Fragen 
auftauchen - einfach auspro¬ 
bieren. 

Wie für die Screens beinhal¬ 
tet Intuition auch für Windows 
einige für den Programmierer 
interessante Funktionen. Diese 
erwarten allesamt die Adresse 
der Window-Struktur. Wir nen¬ 
nen Sie kurz »win«: 

ActivateWindow(win) akti¬ 
viert ein inaktives Fenster. 

CloseWmdow(win) schließt 
ein Fenster. 

MoveWindow(wm,xp,yp) 
bewegt das Window um xp Pi¬ 
xel nach rechts und um yp Pixel 
nach unten. Negative Werte be¬ 
wirken eine Bewegung in der 
entgegengesetzten Richtung 
(siehe Listing 9). 

RefreshWindowFrame(win) 
der Windowrahmen wird erneu¬ 
ert. 


ReportMouse(win,on): setzt 
das REPORTMOUSE-Flag (bei 
on gleich 1) oder löscht es (bei 
on gleich 0). 

SetWindowTttle(win,& 
WTitle.&STitie); verändert 
Screen- und Fenstertitel. Para¬ 
meter 2 und 3 sind die Adres¬ 
sen der neuen Titel für Fenster 
und Screen. Bei der Angabe 
von -1, ändert sich der Titeltext 
nicht. 

SizeWmdow(win,x,y): ver¬ 
größert das Fenster um x Punk¬ 
te nach rechts und y Punkte 
nach unten (Listing 9). Negative 
Werte verkleinern das Fenster 
entsprechend. Achtung: Intui¬ 
tion prüft die Werte nicht. Wenn 
Sie also einen Wert angeben, 
der Ihr Fenster beispielsweise 
über den Screenrand ragen 
läßt, so wird Ihnen das der Guru 
übelnehmen. 

ViewAddress(wln): liefert 

die Adresse der ViewPort- 
Struktur. Die Adresse der View- 
Struktur erhalten Sie ganz ähn¬ 
lich mit ViewAddressO- 

WlndowLimlts 
(wln,MlnX,MinY,MaxX,Ma}ör): 
verändert die in der NewWin- 
dow-Struktur vereinbarten Li¬ 
mits. Hatte die Funktion Erfolg, 
liefert sie 1, ansonsten 0. 

WmdowToBack(win) und 
WindowToFront(win): verrich¬ 
ten die Arbeit der Window- 
Depth-Gadgets. 

Das waren viele Routinen in 
geballter Form. Testen Sie sie 
ausführlich, damit Sie von den 
Möglichkeiten, die Ihnen zur 


Verfügung stehen, einen Ein¬ 
druck gewinnen. 

Hier noch einige Probleme, 
an denen Sie sich selbst testen 
können: 

- Öffnen Sie ein Window mit 
allen Systemgadgets. Pro¬ 
grammende soll bei der Anwahl 
des CloseGadgets erfolgen. 

- Schreiben Sie ein Pro¬ 
gramm, das den beim Aufruf 
mitgegebenen Kommandopa¬ 
rameter als Windowtitel ins ak¬ 
tuelle CLI-Window einträgt. Der 
Screentitel soll dabei nicht ver¬ 
ändert werden. 

- Öffnen Sie ein kleines Win¬ 


dow, das Ihnen die Möglichkeit 
gibt, »RAWKEY«-Messages zu 
empfangen. Geben Sie die Key- 
Codes und Key-Qualifiers auf 
das aktuelle CLI-Window aus. 
Beobachten Sie, wie sich der 
Wert Qualifier beim Niederhal¬ 
ten einer Taste verändert (Re- 
peat-Funktion). 

Nachdem Sie die grundle¬ 
genden Intuition-Elemente 
Screen und Window beherr¬ 
schen, wollen wir unseren Spa¬ 
ziergang durch den Betriebssy¬ 
stemteil Intuition unterbrechen 
und uns, in einem Exkurs, den 
Grafikfunktionen zuwenden. 


Die Window-Flags 


WlNDOWSlZtNG: das neue Fenster verfügt über das Systemgad- 
get, mit dessen Hilfe der Anwender die Größe des Fensters festlegen 
kann. 

SIZEBRIGHT: das WINDOWSlZING-Gadget ist am rechten Rand 
angebracht. Dies ist die Voreinstellung. Der Nachteil: der ganze rech¬ 
te Rand des Fensters kann in der Breite des Gadgets nicht beschrie¬ 
ben werden. 

SIZEBBOTTOM: das WINDOWSlZING-Gadget ist an der rechten 
Seite des unteren Fensterrandes angebracht. Man kann nun volle 80 
Zeichen auf dem Fenster darstellen. Allerdings kann man in dieser 
Einstellung den unteren Fensterrand nicht beschreiben. 

WINDOWDRAG: die Titelleiste verwandelt sich in ein Verschiebe- 
Gadget. 

WINDOWDEFTH; Intuition montiert die Depth-Gadgets. 

WINDOWCLOSE: Ist das Gadget zum Schließen eines Fensters. 

SMART_REFRESH: Intuition kopiert Fensterteile, die durch Über¬ 
lagerung anderer Elemente verlorengehen, in einen reservierten 
Speicher, um das Fenster später wieder regenerieren zu können. Be¬ 
reiche, die durch Verkleinern des Fensters verlorengehen, kann Intui¬ 
tion nicht wiederherstellen. 

SIMPLE^REFRESH: Intuition teilt uns über IDCMP mit, wenn das 
Fenster renovierungsbedürftig ist. Das Programm muß dann selbst 
den Fensterinhalt erneuern. Dies geschieht auf folgende Art: 
BeginnRefresh(&window); 

NeuAufbauO; 

EndRefresh(&window,ok); 

Nach dem Aufruf der Funktion BeginRefreshQ reagiert Intuition nur 
noch auf Funktionen, die sich auf den sichtbaren Bereich des Fen¬ 
stersbeziehen. Es folgt nun eine Routine zum Fensteraufbau. Danach 
schalten wir Intuition mit EndRefreshO wieder in den Normalzustand 
zurück. Die Parameter der beiden Refreshfunktionen sind Zeiger auf 
das entsprechene Window. Der zusätzliche Parameter »ok« von End¬ 
RefreshO ist TRUE, wenn das Fenster komplett erneuert wurde und 
FALSE, wenn nicht. 

SIMPLE-REFRESH: ist zwar etwas umständlich zu bedienen, spart 
jedoch gegenüber SMART_REFRESH oder SUPER_BITMAP 
enorm an Speicherplatz. 

SUPER_BITMAP: ist ein weiterer Window-Refreshtyp. Der kom¬ 

plette Fensterinhalt befindet sich als Kopie im Speicher. Möglicherwei¬ 
se stellt das Fenster nur einen Ausschnitt des gesamten Bereichs dar. 
Diese Art des Refreshing ist sehr speicherintensiv und findet seltener 
eine Anwendung, weshalb wir sie auch in Tool.h nicht berücksichti¬ 
gen. 

BACKDROP: das Window befindet sich immer hinter allen anderen 
Windows. 

REPORTMOUSE: die Koordinaten des Mauszeigers werden bei je¬ 
der Änderung über IDCMP aktualisiert. 

GIMMEZEROZERO: bei diesem Window zeichnet Intuition den 
Rahmen, die Titelleiste und die Systemgadgets getrennt vom eigentli¬ 
chen Fensterinhalt. Sie sind dadurch vor Uberschreiben geschützt. 

BORDERLESS: ein Fenster ohne Rahmen wird geöffnet. 

ACTIVATE: das Fenster ist gleich nach dem Öffnen aktiviert. 

RMBTRAP: in diesem Window verhält sich die rechte Maustaste wie 
die linke. 

NOCAREREFRESH: Intuition erneuert das Window nicht und 
schickt uns auch keine entsprechende Nachricht. 


Tabelle 7. Die Window-Flags auf einen Blick 
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Auf diese Weise kommt nicht 
zu viel Therorie auf einmal auf 
Sie zu. Sie können viele Funk¬ 
tionen testen und dabei Ihr Wis¬ 
sen festigen. 

Anders als bei vielen ande¬ 
ren Computern sind im Be¬ 
triebssystem des Amiga eine 
große Anzahl, zum Teil sehr lei¬ 


stungsfähiger Grafikroutinen 
enthalten. Dabei fällt dem 
C-Programmierer die einfache 
Handhabung dieser Routinen 
angenehm auf. 

Für die Verwendung dieser 
Routinen ist die RastPort- 
Struktur sehr wichtig. Machen 
wir uns gleich zu Beginn mit ihr 


vertraut (siehe Listing 14). 

. Die Aufgabe dieses Daten¬ 
blocks erkennen Sie am be¬ 
sten, wenn Sie sich über die 
Aufgaben der einzelnen Kom¬ 
ponenten im klaren sind: 

struct Layer *Layer 

ist die Adresse der Layer- 
Struktur des Elementes, dem 
der RastPort angehört. Layers 
sind grundlegende Grafikele¬ 
mente, 

Das mag Sie an die Eigen¬ 
schaften eines Windows erin¬ 
nern, tatsächlich ist es so, daß 
Windows nichts anderes als er¬ 
weiterte Layers sind. 

struct BitMap xBitMap 
die BitMap-Struktur (Listing 15) 
ist ein Bestandteil der Screen 
Struktur. 

USHORT ÄAreaPtrn 

ein Zeiger auf ein Array, wel¬ 
ches die Daten des aktuellen 
Füllmusters enthält. Jede Funk¬ 
tion, die in diesem RastPort Rä¬ 
chen füllt, etwa RectFillO, 
FloodO etc., füllt mit diesem Mu¬ 
ster. 

struct TmpRas *TrnpRas 

ist ein Zwischenspeicher für 
Füllfunktionen. Das (temporä¬ 
re) Raster muß mindestens so 
groß sein, wie die zu füllende 
Fläche. 

struct Areainfo *Area 
Info 

Adresse der Arealnfo-Struktur, 
welche zum Beispiel die Eck¬ 
punkte eines Area-Polygons 
enthält. 

struct Gelslnfo *Gels 
Info 

Zeiger auf eine Struktur, die für 
Grafikelemente wie zum Bei¬ 
spiel BOBs (Blitter-Objects) im 
RastPort wichtig ist. 

UBYTE Mask 

mit dieser Maske können wir 
festlegen welche Plane vor 
Überschreiben geschützt wer¬ 
den soll. Eine geschützte Plane 
wird durch eine 0 dargestellt. 
Wir lernen später diesen Wert 
zu verändern. 

BYTE FgPen,BgPen,A01Pen 
die Farben für Zeichen-, Hinter¬ 
grund-, Outlinestift, auch APen, 
BPen und OPen genannt. 

BYTE DrawMode 

der aktuelle Zeichenmodus. Es 
kommen »JAM1«, »JAM2«, 

«COMPLEMENT«, «INVERSE- 
VID« und Kombinationen davon 
in Frage. 

BYTE AreaPtSz 

ist die Höhe des Füllnuisters als 
Potenz zur Basis 2. Die folgen¬ 
den drei l^mponenten sind für 
die interne Nutzung des Be- 


struct RastPort 

( 

struct Layer *Layerj 
StJTUCt BitMap »BitMap; 
USHORT «AreaPtm; 
struct TmpRas »TmpRas; 
struct Areainfo »Areainfo; 
struct Gelslnfo »Gelslnfo; 
UBYTE Mask; 

BYTE FgPen,BgPen,A01Pen; 
BYTE DrawMode; 

BYTE AreaPtSz; 

BYTE linpatcnt; 

BYTE dumray; 

USHORT Flags; 

USHORT LinePtrn; 

SHORT cp_x, cp_y; 

UBYTE mlnterras[83; 

SHORT PenWidth; 

SHORT PenHeight; 
struct TextFont »Font; 
UBYTE AlgoStyle; 

UBYTE TxFlags; 

UWORD TxHeight.TxWldth, 
TxBaseline; 

WORD TxSpaoing; 

APTR »RP.User; 

ULONG longreserved[2]; 
UWORD wordreserved[7]; 
UBYTE reaerved[8]; 

]; 

Listing 14. Die RastPort- 
Struktur beschreibt die 
Zeichenfiäche 


triebssystems bestimmt. Wir 
besprechen weiter ab: 

USHORT LinePtrn 

dieses Zeichenmuster für Li¬ 
nien verändern wir mit Set 
DrPtO. 

SHORT cp_x, cp_y 

die Koordinaten des (unsicht¬ 
baren) Zeichencursors. Die 
Tool.h-Funktion GetPos() liest 
diese Werte. Die Bedeutung 
des Arrays minterms und die 
der Variablen PenWidth und 
PenHeight ist uns unbekannt. 
In der vorliegenden Betriebssy¬ 
stemversion beträgt jedenfalls 
Breite und Höhe des Zeichen¬ 
stifts immer nur 1 Pixel. 

struct TextFont *Font 
Zeiger auf TextFontStruktur des 
im RastPort aktiven Zeichen¬ 
satzes. 

UBYTE AlgoStyle 

die aktuelle SoftStyle-Schrift- 
art, also unterstrichen, kursiv 
oder fett. 

UBYTE TxFlags 

Näheres über den Zeichensatz, 
beispielsweise ob es sich um ei¬ 
nen DiskFbnt oder einen ROM- 
Font handelt. 

UWORD TxHeight 

die Höhe der Zeichen des ak¬ 
tuellen Zeichensatzes. 

UWORD TxWidth 

die Breite eines einzelnen Zei¬ 
chens im Zeichensatz. 


/» Maximalverte des 

/* die Uindowflags */ 
/» Zeiger auf den Menü-Header */ 
/* der Titel des Windows »/ 
/» Zeiger auf den 1. aktiven 

/* Zeiger auf den 


struct Window 
( 

struct Window »NextWindow;/* Adresse des nächsten Windows auf 
dem Screen */ 

SHORT LeftEdge, TopEdge; /* Position der linken oberen 

Fensterecke »/ 

SHORT Width, Height; /» Breite und Höhe des 

Windows »/ 

SHORT MouseY, MouseX; /* Mauszeiger-Koordinaten, bezogen 
auf das Window »/ 

SHORT HlnWldth, HinHeight; /» Hinlmalwerte des 

Fensters »/ 

USHORT MaxWidth, MaxHelght; 

Fensters »/ 

ULONG Flags; 
struct Menu »MenuStrlp; 

UBYTE »Title; 

struct Requester »FirstRequest; 

Requester */ 

struct Requester »DMRequest; 

DüubleMenu-Requester »/ 

SHORT ReqCount; /» Anzahl der zum Window gehörenden offenen 
Requester */ 

struct Screen »WScreen; /* der Screen, auf dem sich das Window 
befindet »/ 

struct RastPort »RPort; /» der Zeiger auf den RastPort des 

Windows »/ 

BYTE BorderLeft, BorderTop, BorderRlght, BorderBottom; /» 
Rahmendaten •/ 

struct RastPort »BorderRPort; /* RastPort des Rahmens »/ 

struct Oadget »FlrstGadget; /» Zeiger auf das erste Gadget */ 
struct Window »Parent, »Descendant; /» vorheriges und 
nachfolgendes Win. «/ 

USHORT »Pointer; /» Zeiger auf die Daten 

des Mauszeigers »/ 

BYTE PtrHelght,PtrWldth; 

Zeigers */ 

BYTE XOffset, YOffset; 

< ltn Pointer */ 

ULONG IDCMPFlags; 

Struktur »/ 

struct MsgPort «UserPort, »WlndowPort; 

Windows */ 

struct IntulMessage »MessageKey; 

Struktur */ 

UBYTE DetallPen, BlockPen; /* Farben, wie ln NewWlndow 

festgelegt */ 

struct Image »CheckMark;/» Zeiger auf die Daten eines 
Altematlvhäkchens •/ 

UBYTE »ScreenTltle; /* Titeltext des Screens «/ 

SHORT GZZMouseX,CZZMouseY; /» Pointer-Koordinaten ln einem 
GZZ-Window »/ 

SHORT GZZWldth.GZZHeight; /» Breite und Höhe eines GlmmeZeroZero- 
Wlndows »/ 

UBYTE »ExtData; /* Verbindung zu externen Datenblöcken •/ 

BYTE »UserData; /♦ Verbindung zu userdefinierten Datenblöcken »/ 
struct Layer »WLayer; /» Adresse der Layer- 
Struktur (s.a. RPort-> Layer) */ 

struct TextFont »IFont; /* Window-Font */ 


/» Höhe und Breite des 


/* Lage des >> heißen Punktes < 
/» IDCMP-Flags aus der NewWindow- 


/» Message-Ports des 


/» Adresse der Message 


Listing 13. Die Window-Struktur enthält jede Menge 
Informationen 


AMIGA-SONDERHEFT4 


43 





UWORD TxBaseline 

die Position der Basislinie der 
Zeichen, ist identisch mit der Y- 
Position des Zeichencursors 
bei der Textausgabe. 

WORD TxSpacing 

der Abstand zwischen zwei Zei¬ 
chen in Pixel (normal 0). 

Die restlichen Daten sind für 
das System reserviert. Sie se¬ 
hen, RastPort ist eine sehr um¬ 
fangreiche Struktur, die interes¬ 
sante Daten für den Program¬ 
mierer bereithält. Viele Ele¬ 
mente darin ändern sich mit 
dem Aufruf bestimmter Grafik¬ 
funktionen. Diese Funktionen - 
wir werden einige davon testen 
- verlangen fast alle die Adres¬ 
se der RastPort-Struktur. Wir 
beziehen diese Adresse für un¬ 
ser Window aus der Window- 
Struktur oder für einen Screen 
aus der Screen-Struktur. Bei¬ 
spiel: 

struct RastPort *RP; 
RP=win->RPortj 

Zum Zeichnen braucht man 
immer einige Zeichenstifte - 
auch auf einem Computer. Dem 
Amiga-Programmierer stehen 
drei verschiedene Stifte zur 
Auswahl. Zum Zeichnen von Li¬ 
nien oder Punkten benutzen 
wir »APen«. Sein Kollege 
»BPen« ist für die Hintergrund¬ 
farbe zuständig, zum Beispiel 
bei der Textausgabe. »OPen« ist 
der dritte im Bunde. Er zeich¬ 
net, sobald man eine Farbe 
festgelegt hat, bei Funktionen 
wie »RectFillO« einen Rahmen. 
Diese Darstellung schaltet man 
mit dem Makro »BNDRY- 
OFF{RP}« aus. Durch Aufruf 
des Makros »SetOPenO« setzen 
wir in der angegebenen 
RastPort-Struktur das Flag 
»AREAOULINE« und durch 
»BNDRYOFFQ« wird es wieder 
gelöscht. 

Zeichenstifte für 
alle Fälle 

Die Farbe eines Stiftes wählt 
man mit der Set-Funktion. Ein 
Beispiel für APen: 

SetAPen(RP, FR); 

Die Parameter sind RastPort- 
Adresse und das Farbregister, 
welches die gewünschte ent¬ 
hält. 

Es sind beim Zeichnen ver¬ 
schiedene Zeichenmodi mög¬ 
lich, man stellt sie mittels 
SetDrMd{RP,modus) ein. Die 
Modi: 

JAM1 - APen zeichnet in der an¬ 
gewiesenen Farbe; 

JAM2 - BPen zeichnet zum Bei¬ 
spiel bei Text den Hintergrund; 


JAM1/COMPLEMENT und 
JAM2/COMPLEMENT - kom¬ 
plementiert die Bits unter der 
Cursorposition, das heißt: 
stammt die Farbe des Pixels un¬ 
ter dem Cursor aus Farbregi¬ 
ster %10101, färbt sich der 
Punkt beim Überzeichnen in 
der Farbe, welche Farbregister 
•VoOlOlO enthält; 


JAM1/INVERSVID und JAM2/ 
INVERSVID - zeichnet in nega¬ 
tiver Darstellungsform. 

Die Stifte APen und BPen be¬ 
finden sich beide über einem 
imaginären Grafikcursor. Die¬ 
ser läßt sich mit der Funktion 
Move(RP,x,y) an jede beliebige 
Steile des RastPorts bewegen. 
Er bewegt sich dabei »über« der 


Zeichenfläche und hinterläßt 
daher keine sichtbaren Spuren. 

Anders die Funktion Draw 
(RP,x,y). Der Stift »senkt« sich 
an der aktuellen Cursorposition 
ab und zeichnet eine Linie zu 
den neuen, als Parameter mit¬ 
gegebenen l^ordinaten x und 

y- 

Eine geknickte Linie erhalten 
wir mit dem Aufruf der Funktion 
PolyDraw(RRn,&koordinaten[0]). 
Der Parameter n ist dabei die 
Anzahl der Knickpunkte plus 
Anfangs- und Endpunkt der Li¬ 
nie. »koordinaten« ist ein Zeiger 
auf ein Array, das die Koordina¬ 
ten der Punkte enthält. Dieser 
Aufruf zeichnet ein Dreieck: 

USHORT koord[]=[ 

0 , 100 , 

100,100, 

50, 50, 

0,100 

]; 

funktionO 

[ 

PolyDraw(RP,4,&koord[0 



Wenn Ihnen die einfachen Li¬ 
nienzüge zu eintönig sind, ent¬ 
werfen Sie sich ein eigenes Li¬ 
nienmuster. SetDrPt(RP, mu- 
ster) verlangt als Muster einen 
16-Bit-Wer1. Bits, die in diesem 
»WORD« gesetzt sind, werden 
auch in der Linie gesetzt. Ge¬ 
löschte Bits bedeuten gelösch¬ 
te Punkte. 

Ein einzelnes Pixel des Rast- 
Ports könnten Sie färben, in¬ 
dem Sie MoveO und DrawO mit 
gleichen Parametern aufrufen. 
Es existiert jedoch eigens für 
diesen Zweck eine spezielle 
Funktion. WritePixel(RP,x,y) 
zeichnet einen Punkt an der an¬ 
gegebenen x/y-Position des 
RastPorts. Das Gegenstück da¬ 
zu, ReadPixel(RP,x,y), liefert die 
Nummer des Farbregister aus 
dem die Farbe des Punktes an 
der gewünschten x/y-Position 
stammt. Kehrt die Funktion mit 
einem negativen Ergebnis zu¬ 
rück, konnte sie das Register 
nicht ermitteln. 

WritePixelO färbt einen einzi¬ 
gen Punkt des RastPorts, Set- 
Rast(RP, FR) dagegen alle, und 
zwar in der Farbe, die das Farb¬ 
register FR enthält. Die Funk¬ 
tion SetWrMsk(RR maske) 
schützt Bitplanes vorm Über¬ 
zeichnen. »maske« ist ein 16-Bit- 
Wert, deren unterste 6 Bit die 
sechs BitPianes repräsentie¬ 
ren. Bit 0 steht dabei für Plane 
0. Um eine Plane zu schützen, 
löscht man das entsprechende 
Bit des Parameters maske. 

Ein ausgefülltes Rechteck er¬ 
halten wir mit dem Aufruf der 
Funktion RectFill(RP,x1,y1,x2, 


/* 

W Lupe.c - vergrößert die Pixel unter dem Pointer 
*/ 

#include 'TOOL.h' 

#define RP_S (8iACTIVE_SCREEN->RastPort) 

#define RP_W (win->RPort) 

#define XPob ÜCTIVILSCREEN->HouseX) 

#define YPos (ACTIVE_SCREEN->HouseY) 

etruct Window *win; 

VOID error{iiieldung) 

STRPTR raeldung; 


if(meldung) 
if{win) 
CloseLibO; 
exit{0)} 


printf('Kann Hs nicht öffnenl'.meldung); 
C103eWindow(win)j 


VOID malnO 
( 

ULONG IdcmpsCLOSEWINDOUl NEMSI2EI HOUSEMOVE, 

nags«REPORTHOUSEl WINDOWDRAGl WINDOWSIZINGl 
SIZEBBOTTOMI WINDOWCLOSEl ACTIVATE, 
classsO; 

SHORT xl.yl,x2,y2, 

wldth°21,heights8j 
COUNT i.jj 

if(0penLib()) error{'Lib's')} 
if(l{win*GetWindow(NULL,0,0,110,60,idcinp,flags, 

'Gummi-Lupe '»NULL))) 

error( 'Window'); 

SetDrMd(RP_W,JAHl); 

SetOPen(RP_W,3); 

while{ola8Bl=CLOSEWINDOW)[ /» Programmende über 

CloseGadget */ 

Wait(1< < Win- > UserPort-> mp_SigBlt)j 
class=GetMe9sage(win,0,0,0}; 
if(class==HOUSEMOVE)( 
for(i=-2;i<3ji++){ 
for(j=-2jJ<3{j^)l 

SetAPen{RP_W, ReadPixel(RP_S,XPos+J,YPo8+i)); 

xl= 2+(J+2)*width; 

yl=10+{i+2)»height; 

x2= 2+Ö+3)*«idth; 

y2=10+(i+3)*height; 

ReetFill(RP_W,xl,yl,x2,y2)5 

) 

) /» eventuell gepufferte HOUSEHOVEa 

löschen: */ 

while((class=GetMessage(win,0,0,0))==MOUSEMOVE); 

) 

if(class==NEWSIZE)( /* die Window-Größe wurde 

verändert */ 

width =(SHORT)(uin->Width - 5)/5} /• Breite der 

Rechtecke */ 

helght=(SH0Rl}(win->Height-20)/5; /* Höhe der 
Rechtecke */ 

SetRast(RP_W, 0); /» RastPort komplett 

löschen */ 

RefreshWlndowFrajne(wln); /* Rahmen neu 

zeichnen */ 


error{0); 


Listing 15. Mit der Lupe auf Ptxelsuche 
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y2). Die Parameter x1 und y1 
beschreiben die Position der 
linken oberen Ecke, x2 und y2 
die der rechten unteren. Setzen 
Sie doch einmal vor dem Aufruf 
von RectFillO die Stifte APen 
und OPen auf verschiedene 
Farben. Das Rechteck er¬ 
scheint dann eingerahmt auf 
dem Bildschirm. 

Ein Beispiel dafür finden Sie 
in Listing 15. Nach dem Start 
von »Lupe« erscheinen 25 Pixel 
unter dem Mauszeiger vergrö¬ 
ßert in einem Window. Auch die 
Funktionen SetRastO und Re- 
adPixelO finden in diesem gera¬ 
de 60 Zeilen langen Listing eine 
Anwendung. Nachdem in der 
Hauptfunktion der Zeichenmo¬ 
dus auf JAM1 eingestellt ist, le¬ 
gen wir für den OutlinePen die 
Farbe 4 des aktuellen Screens 
fest (bei einer Original-Work- 
bench orange). 

Es folgt die Hauptschleife 
des Programms, die erst unter¬ 
bricht, wenn der Anwender das 
CloseGadget wählt. Bei jedem 
»MOUSEMOVE« zeichnen wir 
ein orange eingerahmtes 
Rechteck in der Farbe des 
APen. Doch woher nehmen wir 
die Farbinformation? Nun, 
ReadPixelO liefert die Farbe un¬ 
ter dem Pointer, warum sollten 
wir die Information in einer Va¬ 
riablen Zwischenspeichern? 

Also dient hier der Aufruf der 
Funktion ReadPixelQ als ak¬ 
tueller Parameter der Funktion 
SetAPenQ. Nach den ver¬ 
schachtelten »for«-Schleifen lö¬ 
schen wir eventuell anstehende 
»MOUSEMOVE«-Messages in 
einer »while«-Schleife. Wie Sie 
wissen, puffert sonst Intuition 
diese Nachrichten. 

Kommunikation 
mit Messages 

Die Variable dass verläßt 
diese Schleife mit einem Wert, 
der sich von MOUSEMOVE un¬ 
terscheidet. Wir müssen prü¬ 
fen, ob es sich dabei um die 
Message »NEWSlZE« handelt. 
Daher darf die »if{class= = 
NEWSIZE)«-Anweisung kein 
»else«-Zweig der »if(class=» 
MOUSEMOVE)«-Anweisung 
sein. 

Handelt es sich um eine 
Nachricht der Klasse NEW¬ 
SlZE, so passen wir die Recht¬ 
ecke der neuen Fenstergröße 
an. Wer statt Rechtecke eher 
Rundliches mag, kommt mit 
DrawEllipse(RP,x,y,rh.rv) auf 
seine Kosten. Die Parameter x 
und y beschreiben die Koordi¬ 
naten des Ellipsenmittelpunk¬ 
tes. Den Radius in horizontaler 
Richtung gibt rh an und den in 
vertikaler Richtung rv. Ein aus 


DrawEllipseO entwickeltes Ma¬ 
kro ist DrawCircle(RP,x,y,r}. Es 
zeichnet einen Kreis mit dem 
Radius r an die Position x^. 
DrawCirdeO ist im Headerfile 
gfxmacros.h definiert. Dort fin¬ 
det man auch OFF_DISPLAY 

und ON_DISPLAY, mit deren 

Hilfe man die Bildschirmdar¬ 
stellung ab- beziehungsweise 
einschalten kann. 

Es stehen uns drei Funktio¬ 
nen zur Verfügung, die den 
Elektronenstrahl der Bildröhre 
abfragen. WaitTOFO wartet, bis 
sich der Strahl wieder in der er¬ 
sten Zeile des Monitors befin¬ 


det. WaitBOVP{&VP) wartet, bis 
der Strahl die unterste Zeile des 
angegebenen ViewPorts er¬ 
reicht hat. Parameter ist die 
Adresse des ViewPorts. VBe- 
amPosQ schließlich ermittelt die 
aktuelle vertikale Position des 
Elektronenstrahls. 

Lassen Sie uns an dieser 
Stelle eine kleine Pause einle- 
gen, um die neuen Informatio¬ 
nen verdauen zu können. Nut¬ 
zen Sie die Verweilzeit, um die 
bisher besprochenen Routinen 
ausgiebig zu testen. Fassen Sie 
mehrere Grafikroutinen zu ei¬ 
ner einzigen Funktion zusam¬ 


men, die vielleicht eine Strich¬ 
punkt-Linie zeichnet oder einen 
Rahmen. 

In Tool.h haben wir bereits ei¬ 
nige eigene Grafikfunktionen 
definiert. Es stehen Ihnen nun 
die folgenden Funktionen zur 
Verfügung; 

Lme(RP,col,x1,y1,x2,y2): 
zeichnet in dem angegebenen 
RastPort eine Linie in der Farbe 
col, von der Position xl/yl zur 
Position x2/y2. 

ILineQ: zeichnet ebenfalls ei¬ 
ne Linie, aber im JAM1:COM- 
PLEMENT-Modus. Die Angabe 
einer Farbe ist demnach unnö¬ 
tig, ansonsten sind die Parame¬ 
ter die gieichen wie bei LineQ. 

Zwei Aufrufe dieser Funktion 
mit gleichen Parametern heben 
sich wegen der doppelten l^m- 
plementierung auf. So ist das 
sogenannte Rubberbanding, 
Sie kennen es vom Arbeiten 
(vergrößern, verkleinern, än¬ 
dern der Position) mit Windows, 
realisiert. 

Block(RP,col,x1,y1,x2,y2): 
zeichnet einen rechteckigen 
Block in der Farbe col. Die Posi¬ 
tion der linken oberen Ecke liegt 
bei xl/yl, die der rechten un¬ 
teren Ecke bei x2/y2. 

IBIock(RP,x1,y1,x2,y2): hebt 
einen gewünschten rechtecki¬ 
gen Ausschnitt durch Komple¬ 
mentierung der Farbregister 
hervor. IRast(RP) komplemen¬ 
tiert sogar den ganzen Rast- 
Port. GetPosO ermittelt die ak¬ 
tuelle Position des Grafikcur¬ 
sors. Nach dem folgenden Bei¬ 
spielaufruf enthalten x und y die 
entsprechenden Koordinaten; 
SHORT x,y; 
GetPos(RP,&x,&y); 

GetCol(&VP,nr,&r,&g,&b) 
haben wir schon kurz ange¬ 
sprochen. Die Funktion liest 
das mit nr verlangte Farbregi¬ 
ster des ViewPorts mit der 
Adresse VP aus und belegt die 
Variablen r, g und b mit den 
RGB-Werten. GetColO kehrt mit 
dem Inhalt des Farbregisters 
zurück. Auch hier zur Verdeutli¬ 
chung ein Beispiel; 

SHORT col,r,g,b; 
col=GetCol(&VP,1,&r,&g, 
&b); 

Nach diesem Aufruf enthält 
col den Inhalt den Farbregisters 
1, die Variable r den Rot-Anteil, 
g den Grün-Anteil und b den 
Blau-Anteil der Farbe. Im nor¬ 
malen CLI-Window enthält 
Farbregister 1 den Wert für 
Weiß. Demnach hätte col den 
Wert OxFFF und r, g und b je¬ 
weils den Wert OxF. 

Schauen Sie sich bitte die 
neuen Tool.h-Funktionen ge¬ 
nau an und lesen Sie erst wei¬ 
ter, wenn Sie wirklich wissen, 
wie sie funktionieren. 


/» 

W Flow.c - stellt ein Textfile ln Laufschrift dar 
*/ 

#include "TOOL.h' 

#define RP win->RPort 

LONG size; 

UBYTE »buf; 
atruct Window »winj 

VOID error(nieldung) 

STRPTR meldung; 

{ 

lf{iiieldung) printf("Kann Hs nicht öffnenl\n',meldung); 
if{win) Clo8eWlndow(wln); 

if(buf) FreeFlle(buf,size)5 /• Speicher für File 

freigeben •/ 

CloseLibO; 

exlt(0}; 


VOID Soroll(c) 

UBYTE »c; 

(/* schreibt ein Zeichen und scrollt das Textband acht Pixel 
nach linke */ 

SHORT 1; 

lf({»c<32)ll({*c>127)&&{«c<l60))) »e=' /»Sonderzeichen 
löschen »/ 

Move(RP,631,13); 

Text(RP,c,l)j /* Textausgabe eines 

Zeichens */ 

WaitTOFO; 

for{i-0;l<8;l++) ScrollRaster{RP, 1,0,2,6,637,15); 
lf(GetMe8sage(win,0,0,0)) error(O); /* Programraabbruch */ 


VOID inain(argc,argv) 

SHORT arge; 

STRPTR argv[]; 

{ 

COUNT i; 

ULONG ldcmp=MOUSEBUTTONSlRAWKEYlINACTIVEWINDOW, /« IDCHP- 

Flags */ 

flags=ACTIVATE; /» Window-Flags */ 

lf(argcl=2) printfC'Aufruf: *8 Filename\n',argv[0]); 
else[ 

If(OpenLlbO) error('Libraries')» 

if(l(wln=OetWindow(NULL,0,0,640,23,idoiiip,flag8,NULL,NULL))) 
error{ "Window'); 

if(l(buf=GetFile(argv[l],isize))) error(argv[l]); /* File 
laden */ 

SetDrMd(RP,JAMl); 

SetAPen(RP,l); 

for{i=0;l<size;l++) Scroll(&buf[l]); 

Delay(200); 
error(O); 



Listing 16. Eine Alternative zum CLI-Kommando »TYPE?«: 
Flow listet ein Fiie als Laufschrift. 
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Wir haben noch lange nicht alle 
Grafikroutinen untersucht. 
»Graphics.library« hat noch ei¬ 
nige Überraschungen für uns 
bereit, zum Beispiel: 

Es ist immer wieder beein¬ 
druckend, wenn ganze Grafi¬ 
ken oder Teile davon, in einer 
gleichmäßigen Bewegung auf 
dem Bildschirm verschoben 
werden. Auch hier unterstützt 
uns das Betriebssystem mit ei¬ 
ner speziellen Routine: Scroll- 
Raster(RRr,u,x1,y1,x2,y2). Die 
Parameter x1/y1 und x2/y2 be¬ 
schreiben, wie bei der oben be¬ 
schriebenen BlockOZ-Funktion, 
ein Rechteck. ScrollRasterO 
verschiebt dieses Rechteck »r« 
Pixel nach rechts und »u« Pixel 
nach unten. Negative Werte be¬ 
wirken ein Scrolling in die ent¬ 
gegengesetzte Richtung. BPen 
füllt den frei werdenden Be¬ 
reich. 

Listing 16 demonstriert eine 
Einsatzmöglichkeit der Scroll¬ 
RasterO- Funktion. Rufen Sie 
»Flow« mit dem Namen eines 
Textfiles als Kommandopara¬ 
meter auf. Das fertig übersetzte 
Programm listet das angegebe¬ 
ne File als Laufschrift. Schauen 
wir uns das relativ kurze Listing 
einmal genauer an: Die Funk¬ 
tion mainO öffnet, nach einer 
Überprüfung des Kommando¬ 
parameters, die Libraries und 
das Window. Die Tool.h-Funk- 
tion GetFileO lädt das ge¬ 


wünschte File. Wir befassen 
uns im Abschnitt AmigaDOS 
noch ausführlicher mit Get¬ 
FileO. 

Die Aufrufe der Funktionen 
SetDrMdO und SetAPenO legen 
daraufhin Zeichenmodus und 
-färbe fest. ScrollO gibt jedes 
einzelne Zeichen ganz rechts 
im neu geöffneten Fenster aus. 
Sofort verschieben wir das 
schmale Band mit den Zeichen 
um die Breite eines Zeichens 
nach links. Das Scrolling erfolgt 
Pixel für Pixel, um eine mög¬ 
lichst ruckfreie Bewegung zu 
erreichen. Sobald das Pro¬ 
gramm einen Mausklick, die 
Betätigung einer Taste oder die 
Inaktivierung des Windows re¬ 
gistriert, erfolgt das Programm¬ 
ende. 

Experimentieren Sie doch 
ein wenig mit ScrollRasterO ■ 6s 
lohnt sich. 

Eine Routine, die Farbe ins 
Bild bringt, ist Flood(RP,modus, 
x,y). Sie füllt beliebige Flächen 
in der Farbe des APen. Dabei 
unterscheiden wir zwei Modi, 
die wir mit dem zweiten Para¬ 
meter des Funktionsaufrufes 
mitteilen. 

Ist modus gleich 0, füllt 
FloodO eine Räche, die in der 
Farbe des OPen umrandet ist. 
Die Parameter x/y stehen für ei¬ 
ne beliebige Position innerhalb 
der Umrandung. 

Modus gleich eins bedeutet. 


daß FloodO die zusammenhän¬ 
gende Fläche füllt, die die glei¬ 
che Farbe des Pixels unter der 
x/y Position hat. Rekursive 
Funktionen wie FloodO sind 
sehr speicherintensiv. Es ist da¬ 
her notwendig, für kurze Zeit ei¬ 
ne ausreichend große Bit-Ebe¬ 
ne, ein sogenanntes Temporär- 
Raster, anzulegen. Listing 17 
zeigt, wie Sie Vorgehen kön¬ 
nen. 

Zu Beginn, nach den übli¬ 
chen Schritten, reserviert Alloc- 
RasterO den notwendigen Spei¬ 
cherplatz. Die Verwaltung un¬ 
seres Temporär-Rasters über¬ 
nimmt die Struktur TmpRas, de¬ 
ren Adresse wir an der entspre¬ 
chenden Stelle innerhalb der 
RastPort-Struktur hinterlegen 
müssen. 

InitTmpRasO initialisiert uns 
das Raster an der als ersten Pa¬ 
rameter angegebenen Adres¬ 
se. Wir tragen sie in die Rast- 
Port-Strukturkomponente Tmp¬ 
Ras ein. FreeRasterO gibt den 
belegten Speicher wieder frei. 

In der abgedruckten Form 
färbt Listing 18 eine Fläche ein¬ 
heitlich ein. Es besteht darüber 
hinaus die Möglichkeit, eigene 
Füllmuster zu entwerfen. Der 
Kreativität sind wieder einmal 
keine Grenzen gesetzt. Ein Mu¬ 
ster ist 16 Bit breit, wir de¬ 
finieren es in einem UWORD- 
Array. Im einfachsten Fall be¬ 
deutet ein gesetztes Bit einen 
gesetzen Punkt und jedes 
Array-Element eine eigene Zei¬ 
le im Muster. Die Höhe eines 
Musters entspricht also der An¬ 
zahl der Arrayelemente. Das 
Makro SetAfPtfpP, &data[0], n) 
teilt dem System unseren 
Wunsch mit. Die Parameter 
sind RastPort, ein Zeiger auf 
das »Muster-Array« und die Pi¬ 
xeihöhe des Musters. 

Für die Höhe wird der Expo¬ 
nent zur Basis 2 (2") verlangt. 
Ist die gewünschte Höhe zum 
Beispiel 16, so müssen wir als 
Parameter für die Höhe den 
Wert 4 übergeben, denn 2* er¬ 
gibt 16. Es kommen daher nur 
Höhen wie etwa 1,2,4, 8 etc. in 
Frage. 

Die Farbe der gesetzten 
Punkte entspricht der des 
APen. SetAfPtp erlaubt aber 
auch die Definition mehrfarbi¬ 
ger Muster. Voraussetzungen: 
Sie müssen 

- für jede Bitplane ein eigenes 
Muster entwerfen und 

- den Exponenten, der die Hö¬ 
he beschreibt, mit einem nega¬ 
tivem Vorzeichen angeben. 

Schauen wir uns noch ein¬ 
mal Listing 18 an. Einige Zeilen 
wurden mittels Kommentarzei¬ 
chen von der Compilierung 
ausgeschlossen. Entfernen Sie 
jetzt bitte die Kommentarzei¬ 


chen der beiden unteren Kom¬ 
mentare. 

SetAfPtO erhält als aktuellen 
Parameter für die Höhe, die 
Hochzahi 2. Wir brauchen also 
ein 4 (22) Pixel hohes Muster 
für jede Bitplane (da der Expo¬ 
nent negativ ist). Der Work- 
benchscreen ist mit zwei Pla¬ 
nes ausgestattet, demnach 
muß unser Array 2*4=8 Ele¬ 
menteenthalten. Die ersten vier 
stehen für das Musterder Plane 
1, die nächsten vier für das der 
zweiten Plane. Wenn APen auf 
das oberste Farbregister einge¬ 
stellt ist, auf dem Work- 
benchscreen ist dies Nummer 
3, setzt SetAfPtO das Muster di¬ 
rekt in den Bitplanes. Entspre¬ 
chend ist die Farbgebung (sie¬ 
he Bild 1 im Kapitel »Screens«). 
Schauen Sie sich, nach erneu¬ 
ter Übersetzung, das Ergebnis 
an: FloodO ^üllt nun mit einem 
vierfarbigen Muster. 

Eine weitere, überzeugend 
schnell arbeitende Einrichtung 
zur Erzeugung gefüllter Flä¬ 
chen stellen die sogenannten 
Area-Funktionen dar. Eine An¬ 
zahl gefüllter Kreise, Ellipsen 
und Polygone, die in der soge¬ 
nannten Area-Liste aufgeführt 
sind, lassen sich mit einem ein¬ 
zigen Befehl auf den Bildschirm 
zeichnen. 

Superschnell 
mit Area 

Auch hier müssen wir ein we¬ 
nig Vorarbeit leisten: 

- Einrichten eines temporären 
Rasters und 

- Initialisieren eines Area-Infos. 

Den ersten Punkt haben wir 

gerade besprochen und den 
zweiten nimmt uns die Funktion 
InitAreaO ab: 

struct Areainfo Alnfoj 
WORD Buffer[K*5]; 
InitArea(&AInfo,Buffer, 
K)j 

RP-> AreaInfo=&AInfo; 

Die Parameter dieser Funk¬ 
tion von rechts nach links: das 
Symbol K stellt die Anzahl der 
Flächeneckpunkte (oder Mittel¬ 
punkt bei einem Kreis) plus 1 in 
einer Area-Liste dar. Demnach 
verlangt ein Dreieck die Anga¬ 
be von vier und ein Kreis die An¬ 
gabe von zwei Punkten. Beide 
zusammen in einer Area-Liste 
zählen 6 Punkte. Buffer ist die 
Adresse eines Speicherberei¬ 
ches, der alle f^ordinaten auf¬ 
nehmen kann. Wie aus dem 
oben aufgeführten Programm¬ 
fragment hervorgeht, errechnet 
sich der notwendige Speicher¬ 
bedarf aus der Anzahl der Koor¬ 
dinaten mal 5. 

InitAreaO initialisiert die 
Arealnfo-Struktur an der Adres- 


/* 

W Flood - demonstriert FloodO und SetAfPtO 
*/ 

#include "TOOL.h' 

#deflne RP wln->RPort 

/*UMORD data[]=( 

0, OxFF, 0, OxFF, 

0, 0, OxFF, OxFF 

hv 

VOID malnO 
! 

struct Window *win; 
struct TmpRas Raster; 

PLANEPTR Bitplane; 

lf(0penLlbOI I (I (win=GetWindow(NULL,0,0,320,256,0,ACTIVATE, 
'Flood',0)))) 

prlntfC'Klx geht mehrl!'); 
else[ 

Bltplane=AllooRaster{320,256); 
InitTinpRas(&Raster,Bitplane,RASSIZE(320,256)}; 

RP-> TmpRas=&Raster; 

SetAPen(RP,3); 

DrawCIrcle(RP,160,128,100); 

/» SetAm(RP,&data[0],-2); */ 

Flood(RP,1,160,128); 

Delayöoo); 

FreeRa8ter(Bltplane,320,256); 

CloseWirdow(wln); 

CloseLibO; 


Listing 17. Füllen mit Komfort - die FloodO Funktion. 
Ruf’ doch mal auf. 
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/* 

\\ Brush.c - Zeichnen tDit dem Teil eines RastPorts 
*/ 

#include TOOL.h' 

#deflne RP_C (cll->aPort) 

#define RP_W (wln->RPort) 

#define XPos (uln->KouseX) 

#define YPos (wln->MouseY) 

struct Window »win,»cll; 

VOID error(nieldung) 

STRPTR meldung; 

( 

if(itieldung) printf('Kann ts nicht öffnen!'.meldung); 
if(wln) C108eWirdow(wln); 

CloseLibO; 
exlt(O); 

) 

VOID malnO 
( 

ULONG ldcmp=CLOSEWINDOWl HOUSEMOVEl MOUSEBUnONS, 

flagS*REPORTHOÜSEl RMBTRAPi WINDOWCLOSEl ACTIVATE, 
clasasO; 

USHORT Code; 

ÜBYTE minterm; 

lf(OpenLlb()) error('Lib's'); 
cli»ACTIVE_WlMDOW; 

lf(!(wln=GetWindow(MULL,0,40,640,216,idcrap.flaga,'Brush'.NULL))) 
error('Window'); 

while( Claas lsCLOSEWINDOW)( /» Progranunende Ober 

CloseGadget */ 

Walt(1< < Win-> UaerPort-> mp_SigBlt); 
clas8°GetMeaaage(wln,&code,0,0); 

lf{(cla88..H0USEBUTT0NS)8ti((code==SELECTD0WN)l I (code»= 
MENUD0WN))){ 

lf(code»«SELECTD0WN) mlnterm»0xC0; /• Original 

Qbemehnen »/ 

elae mlnterni»0x30;/» Original 

invertieren »/ 

whlle((oode!=SELECTUP)&&(codel»MENUUP))(/* Knopf 
losgelaaaen */ 

Walt (l< <win-> UaerPort->mp_SigBlt); 

cla8e>GetHe88age(win,&code,0,0); 

lf(cla8S*«MOUSEMOVE){ 

lf(YPo8>10) /* Titelleiate mit CloseGadget 
schützen */ 

CllpBlit(RP_C,0,0,RP_W,XPo8,YPo8,80, 

40,minterm); 

while((class>GetHes8age(vin,&code,0,0})» 
MOUSEMOVE); 

) 

) 

j 

1 

error(O); 

j 

LIsting 18. Der Blttter macht’s möglich: Zeichnen mit dem 
Teil eines RastPorts als Brush. 


se &Alnfo. Wir weisen sie Are- 
alnfo, einer weiteren Kompo¬ 
nente der RastPort-Struktur, zu. 

Die Vorbereitungen sind da¬ 
mit schon abgeschlossen. Es 
kann also losgehen: AreaMove 
(RP,x,y) schließt ein eventuell 
angefangenes Polygon und 
legt an der Position x/y des 
RastPorts RP den Anfangs¬ 
punkt eines neuen fest. 

AreaDraw(RP,x,y) erweitert 
das angefangene Polygon um 
den Eckpunkt x/y. 

AreaEllipse(RP,x,y,rh,rv) 
hängt der Area-Liste Informatio¬ 
nen über eine Ellipse an. Der 
Mittelpunkt liegt bei x/y, rh ist 


der horizontale Radius und rv 
der vertikale Radius. Das Ma¬ 
kro AreaCircle(RP,x,y,r) zeich¬ 
net, wenn die Screenauflösung 
stimmt, eine Kreisfläche. 

Area-Funktionen liefern, 
wenn alles klappt, den Wert 0, 
im anderen Fall 1. Ausnahme ist 
AreaDrawO, sie kehrt im Fehler¬ 
falle mit -1 zurück. Das »Zau¬ 
berwort«, das alle Flächen der 
Area-Liste buchstäblich auf ei¬ 
nen Schlag darstellt, heißt 
AreaEnd(RP). Auch hier hilft 
SetAfPtO, wenn einfarbige Flä¬ 
chen zu langweilig wirken. 

OPen zeichnet, nach einer 
entsprechenden Farbzuwei- 


atmet BitHap 

1 

UWORD ByteaPerRow; 


/* Bytes pro BltMap-Zeile (Breite/8) */ 

WORD Rows; 

/• Anzahl der Zeilen (Höhe) */ 

UBYTE Flags; 

/» ??? ungenutzt */ 

UBYTE Depth; 

/* Anzahl der BitPlanen (BltEbenen) */ 

WORD pad; /» Platzhalter - PLANEPTR beginnen auf LONGWORD »/ 

PLANEPTR Planes[8]; 
l5 

/* die Adressen der BitEbenen im Speicher »/ 

LIsting 19. Elementare Daten über den Blldschirminhalt 

verwaltet BitMap 



Verknüpfung 

Minterm 

IV&IN 

00010000 = 0x10 

IV &N 

00100000 = 0x20 

V&IN 

01000000 = 0x40 

V&N 

00010000 « 0x80 


Tabelle 8. Mit Minterms werden Daten verknüpft 


sung, wie bei RectFillQ, einen 
Rahmen um die Polygone. Die¬ 
ses Extra läßt sich, wir haben es 
schon erwähnt, mit dem Makro 
BNDRYOFF(RP) abschalten. 

Apropos RectFillO: Unser 
Area-Beispielprogramm befin¬ 
det sich in Tool.h. Es handelt 
sich um eine Schwesterfunk¬ 
tion von RectFillO- 

EIIFill(RP,col,x,y,rh,rv) zeich¬ 
net gefüllte Ellipsen. Parameter 
und Returnwert entsprechen 
bis auf »col«, der gewünschten 
Farbe, denen der Funktion Are- 
aEllipseQ. Das hiervon abgelei¬ 
tete Makro CircFillQ zeichnet 
ausgefüllte Kreise. Sie finden 
es in der Tool.h-Rubrik Makros. 

Manchmal Ist es notwendig, 
einen bestimmten Teil des Rast- 
Poris, vielleicht eine komplexe 
Zeichnung, an eine andere 
Stelle oder sogar in einen ande¬ 
ren RastPort zu kopieren. Auch 
hier stehen uns Routinen mit 
überraschender Ausführge¬ 
schwindigkeit zur Verfügung. 
Es handelt sich um die Blitter- 
Funktionen. Die Haupt- und 
Lieblingsaufgabe dieses Co¬ 
prozessors ist das l^pieren von 
Daten, wobei er die l^pie 
gleichzeitig noch durch logi¬ 
sche Verknüpfungen mit dem 
Zielbereich verändern kann. 

Die im folgenden beschrie¬ 
benen Funktionen nutzen diese 
Fähigkeit für den grafischen 
Bereich. 

Beginnen wir mit ClipBlit 
(&von,x1,y1,&nach,x2,y2,b,h,m). 
Diese Funktion ermöglicht das 
Kopieren eines rechteckigen 
Bereiches, von RastPort »von« 
nach RastPort »nach«, in einer 
atemberaubenden Geschwin¬ 
digkeit. 

Die linke obere Ecke des 
Quellrechtecks befindet sich an 
der Position xl/yl im RastPort 
»von«. Es ist »b« Pixel breit und 


»h« Pixel hoch. ClipBlitO kopiert 
es so, daß sich die linke Ecke an 
der F^sition x2/y2, im RastPort 
»nach« befindet. Natürlich kön¬ 
nen Sie für beide RastPorts 
auch die gleiche Adresse ange¬ 
ben. 

Das Programm »Brush« (Li- 
sting 18) demonstriert die Clip- 
BlitO-Funktion. Starten Sie das 
Programm aus dem CLI-Win- 
dow. Sie können dann in einer 
eigenen Zeichenfläche mit ei¬ 
nem Ausschnitt des CLI-Win- 
dows zeichnen. Drücken Sie 
die linke Maustaste, wird bei je¬ 
der Mausbewegung der Quell¬ 
bereich unverändert in den Ziel¬ 
bereich kopiert. Mit Druck auf 
die rechte Taste erscheint das 
kopierte Rechteck invertiert. 
Wir haben die Möglichkeit der 
Veränderung des Bereichs 
durch eine logische Verknüp¬ 
fung genutzt. Die Art der Ver¬ 
knüpfung teilen wir dem Blitter 
überden letzten Parameter»m« 
der ClipBlitO-Funktion mit. Die 
UBYTE-Variable »m« steht für 
Minterm. Tabelle 6 zeigt: mit 
den oberen 4 Bit teiien wir die 
gewünschte Verknüpfungsart 
mit. 

Nehmen wir das einfachste 
Beispiel. Wert 0x80 als Minterm 
gibt als Ergebnis RastPort V 
(von) AND RastPort N (nach). 
Das heißt, nur wo in beiden 
RastPorts Punkte gesetzt sind, 
ist nach der Verknüpfung auch 
wirklich ein Punkt zu sehen. Ein 
weiteres Beispiel, diesmal mit 
einem Minterm-Wert von 0x40. 
Der Blitter setzt einen Punkt, 
wenn in V ebenfalls ein Punkt, 
aber in N kein Punkt gesetzt 
war. Die Verknüpfung erfolgt 
BitPlane für BitPlane. Die Farbe 
richtet sich nach dem Inhalt des 
Farbregisters mit der Nummer 
des neuen Wertes (siehe Bild 
1). Sie können die in Tabelle 6 
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aufgeführten Minterms auch 
untereinander mit OR verknüp¬ 
fen. Bei 4 Bits gibt es 2^=16 
Möglichkeiten. Wieder einige 
Beispiele; 

(1V&!N)I(!V&N) 

Die Werte 0x10 und 0x20 
wurden mit ODER zu 0x30 ver¬ 
knüpft. Der obige Ausdruck läßt 
sich noch vereinfachen, indem 
man !V ausklammert: 

IV&( !NlN) = !V 

Der Klammerausdruck !N:N 
wird zu 1 und wir erhalten dem¬ 
nach als Ergebnis IV&I, was IV 
entspricht. 

Der Wert 0x30 invertiert also 
den Bereich in RastPort V und 
legt ihn in RastPort N ab. So 
wurde auch die Invertierung in 
Brush {Listing 19) erreicht. 

Oder der Wert OxCO: 

(v&N)i(v&m)=v 

Hier wird der Quellbereich 
ohne Veränderung übernom¬ 
men. Nehmen Sie sich doch 
das Programm Brush vor und 
testen Sie einmal alle 16 Min¬ 
terms durch. Besonders inter¬ 
essant ist 0x60. Er veranlaßt 
den Blitter beide RastPorts mit 
EOR zu verknüpfen, das heißt 
nur an den Stellen werden 
Punkte gesetzt, wo entweder in 
V oder in N ein Punkt gesetzt 
war. Zweimaliges Bütten mit 
gleichen Parametern stellt den 
ursprünglichen Zustand wieder 
her. In Malprogrammen wird 
diese Möglichkeit oft genutzt, 
um selbstdefinierte Brushes an 
der Pointerspitze mitzuführen. 
ClipBlitO blittet von RastPort zu 
RastPort. 

Gehen wir noch eine Ebene 
tiefer und arbeiten mit Bit- 
Maps. Oft ist es nicht notwen¬ 
dig, einen komplett initialisier¬ 
ten RastPort im Arbeitsspei¬ 
cher mitzuschleppen. In man¬ 
chen Fällen, zum Beispiel der 
UNDO'Buffer in Zeichenpro¬ 
grammen, reichen Informatio¬ 
nen über die Lage des Spei¬ 
cherplatzes für die einzelnen 
BitPlanes und deren Größe 
aus. Diese Informationen sind 
in der BitMap-Struktur {Listing 
19) gebunden. Hier die Initiali¬ 
sierung einer BitMap-Struktur 
namens BM: 

struct BitMap BMj 

InltBitMap(&BM,p,b,h ); 
for(i=0;i<p;i-H-) > 

BM.Planes[i]= 

(PLANEPTR)AllocRaster 

(b,h))); 

if(BM.Planes[l]) 

BltClear 

(BM.Planes[i],RASSIZE 

(b,h),l); 

eise qult(); 


quitO 


for(i=0;i<p;l++)[ 
lf(BM.Planes[i]) 
FreeRaster(BM.Planes[i ], 
b,h)j 


Mit der InitBitMapO-Funktion 
legen Sie fest, wie viele Planes 
(p) von der Größe b*h (Breite 
• Höhe) Pixel Sie benötigen. Die 
Funktion AllocRaster reserviert 
den notwendigen Speicher¬ 
platz im Chipmemory. Als 
Rückgabewert erhalten Sie die 
Presse der Plane oder, falls 
ein Fehler auftrat, NULL. Blt- 
ClearQ löscht die angegebene 
Plane. Die notwendige Größe 
errechnen wir mit dem Makro 
RASSIZEQ. 

Der dritte Parameter ist ein 
Flag mit folgender Bedeutung: 
ist Bit 1 gesetzt, deutet die 
Funktion die oberen 16 Bit des 
zweiten Parameters (hier RAS- 
SIZE(w,h) als die Anzahl der zu 
löschenden Zeilen und die un¬ 
teren 16 Bit als die Anzahl der 
zu löschenden Bytes pro Zeile; 
ein Rechteck wird gelöscht. Ist 
jedoch Bit 1 gelöscht, so inter¬ 
pretiert BltClearQ den zweiten 
Parameter als die tatsächliche 
Anzahl der zu löschenden By¬ 
tes. Setzt man Bit 0 auf eins, 
wartet das Programm, bis der 
Blitter mit Löschen fertig ist. 

In unserem Beispiel gibt 
demnach der zweite Parameter 
die Anzahl der Bytes an, die in 
der BitPlane gelöscht werden 
sollen, dabei wartet das Pro¬ 
gramm so lange, bis der Blitter 
seine Arbeit verrichtet hat. 

Es versteht sich von selbst, 
daß der disziplinierte Program¬ 
mierer die reservierten BitPla¬ 
nes vor Programmende wieder 
freigibt. Hier geschieht das mit 
FreeRasterQ. Parameter sind 
neben der Adresse der Plane, 
deren Breite und Höhe. Das wa¬ 
ren die Vorbereitungen, nun zur 
Anwendung: 

struct BitMap von,nach; 
SHORT xl,yl,x2,y2,b,h; 
UBYTE in,M; 

PLANEPTR t; 

BitsitMap(&von,xl,y1, 
&nach,x2,y2,b,h,ra,M,t); 

Diese riesige Anzahl von ak¬ 
tuellen Parametern sind not¬ 
wendig, um ein Rechteck von 
einer BitMap in die andere zu 
»blitten«. Aber keine Angst, die 
Funktion ist der zuvor bespro¬ 
chenen sehr ähnlich. Die Para¬ 
meter von und nach sind dies¬ 


mal die Adressen der beiden 
BitMaps. Auch hier können bei¬ 
de gleich sein, nur müssen wir 
in diesem Fall Platz für einen 
Zwischenspeicher schaffen, 
falls sich die Bereiche über¬ 
schneiden. Dieser Zwischen¬ 
speicher könnte zum Beispiel 
ein temporäres Raster, -wie bei 
den Area-Funkionen bespro¬ 
chen - sein. Es muß nur so groß 
sein, um den überlappenden 
Bereich aufnehmen zu können. 
Der letzte Parameter, im Bei¬ 
spiel t, venA/eist auf das Raster. 

Das große M im Aufruf steht 
für Maske. Hiermit geben Sie 
an, welche BitPiane(s) die 
Funktion blitten soll. Für jede 
Plane müssen Sie ein Bit set¬ 
zen, wobei die Nummer in der 
BitMap-Struktur gleich dem Bit 
in »Maske« ist. 

Setzen Sie also Bit 0 und 1, 
wenn Sie möchten, daß die Pla¬ 
nes 0 und 1 geblittet werden 
sollen. Ansonsten entsprechen 
die Parameter denen der be¬ 
reits besprochenen ClipBlifQ- 
Funktion. 

Auch das Kopieren aus einer 
BitMap in einen RastPort ist 
möglich: 

BltBitMapRastPort(&von,x1, 
y1,&nach,x2,y2,b,h,m). Die 
Adresse »von« ist die Quell-Bit- 
Map und »nach« die des Ziel- 
RastPorts. Alle anderen Para¬ 
meter können Sie von den vor¬ 
angegangenen Funktionen 
übernehmen. 

Eine Funktion, die von einem 
RastPort in eine BitMap kopiert, 
existiert nicht. Vielleicht fällt Ih¬ 
nen eine ein? Denken Sie dabei 
an die einzelnen Komponenten 
der RastPort-Struktur. 

Graphics.library ist nicht nur 


für Grafik zuständig, sondern 
enthält noch eine Menge Funk¬ 
tionen, die die Textausgabe und 
das Arbeiten mit verschiede¬ 
nen Zeichensätzen erleichtern 
oder überhaupt erst ermögli¬ 
chen. 

Der Kern der PrintQ-Funktion 
unseres Tools zum Beispiel, 
ist die Betriebssystemroutine 
Text(RP, &text, len) (siehe Li¬ 
sting 1). Diese gibt den Text an 
der aWuellen Grafikcursor-Po¬ 
sition aus. Als Parameter die¬ 
nen RastPort, ein Zeiger auf 
den Text und die Anzahl der 
Textzeichen. 

Unsere Funktion Print(RP, 
&text, col, X, y) ermöglicht die 
einfache Ausgabe eines Textes 
an einer beliebigen Position 
des RastPorts. Dabei ist &text 
die Adresse, col die Farbe und 
x/y die Position des Ausgabe¬ 
textes. Die Position bezieht 
sich, dank der l^rrektur der Y- 
Position in der PrintQ Funktion, 
auf die linke obere Ecke des 
Textes. Normalerweise gibt 
TextO den Ausgabetext an der 
Baseline aus. Ein Aufruf wie 
Print(RP/'Text",2, 1, 

99) ; 

Print(RP, "Text",l, 0, 

100 ) ; 

bewirkt eine Textausgabe mit 
»Schatten«. Die systemunab¬ 
hängige Funktion strIenO ermit¬ 
telt die Anzahl der Zeichen des 
Ausgabetextes. Dagegen liefert 
Ihnen TextLength(RP,&text,len) 
die Länge des Textes in Pixel 
als SHORT-Wert. Die Parame¬ 
ter entsprechen dabei denen 
der TextO-Funktion. 

Jeden Zeichensatz können 
Sie im nachhinein softwaremä- 


struct AvailFont8[ 


UWORD af_Type; /« Speicher (AFF_MEH0RY) oder Disk (AFF_D1SK) »/ 

struct TextAttr af_Attr; 

]; 

/* die TextAttr-Struktur »/ 

struct Tej(tAttr( 


STRPTR taJJaniej 

/» Name des Zeichensatzes »/ 

UWORD ta_YSlze; 

/» die Höhe in Pixel */ 

UBYTE ta_Style; 

/* die Schriftart */ 

UBYTE ta_Flag3; 

1 : 

/• verschiedene Einstellungen */ 

Listing 20. Wichtige Strukturen für die Verwendung neuer 

Zeichensätze 




Textstil 

Ausgabe 

FS_NORMAL 

Normalschrift 

FSF_UNDERLINED 

Schrift unterstrichen 

FSF_BOLD 

Fettschrift 

FSF_ITALIC 

Kursivschrift 

FSF_EXTENDED 

Breitschrift 


Tabelle 9. Die verschiedenen Schriftarten können kombiniert 
werden 
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ßig verändern. Die TextO- 
Funktion gibt dann die Zeichen 
nach Wunsch kursiv, unterstri¬ 
chen, fett oder breit aus. Die 
einzelnen Schriftarten kann 
man natürlich auch kombinie¬ 
ren, zum Beispiel kursiv und 
unterstrichen. 

Dies bewirkt ein Aufruf der 
Funktion SetSoftStyle(RP,nStil, 
mStil). Die Parameter sind 
RastPort, neuer Stil und mögli¬ 
cher Stil. 

Tabelle 9 zeigt die möglichen 
Stil-Flags, die man als zweiter 
Parameter einträgt. Den dritten 
Parameter erhält man mit dem 
Aufruf 

BYTE mStil; 

mStil=AskSoftStyle(RP); 

Schriften mit 
Stil 

Er besagt, welche Schriftar¬ 
ten softwaremäßig erzeugt wer¬ 
den können. Der folgende 
Funktionsaufruf schaltet auf 
kursiv und unterstrichen; 

SetSoftStyle(RP,FSF_ 

ITALICIFSF.UNDERLINED, 

AskSoftStyle(RP))j 

Natürlich kann man auch 
gänzlich neue Zeichensätze la¬ 
den. Lassen Sie uns zuerst fest¬ 
stellen, welche Zeichensätze 
uns zur Verfügung stehen. 
Hierzu dient die Funktion: 

fehler=AvailFonts 
(&buffer,bytes,flags); 

AvailFontsO erwartet als er¬ 
sten Parameter die Adresse ei¬ 
nes Buffers für die gewünsch¬ 
ten Informationen. Die Größe 
dieses Buffers ist im Parameter 
bytes festgelegt. Mit Hilfe der 
Flags entscheiden wir, wo die 
Zeichensätze zu suchen sind. 
AFF_DISK sucht auf der Dis¬ 

kette im logischen Laufwerk 

»Fonts:« und AFF_MEMORY 

sucht im Speicher. Beide Flags 
kann man kombinieren. 

Klappt die Funktion fehlerlos, 
so liefert sie den Wert 0. Im an¬ 
deren Fall war der Buffer zu 
klein gewählt, der Returnwert 
gibt an, um wieviel Byte. Nach 
einer entsprechenden Berichti¬ 
gung des Parameters bytes, 
sollte dann alles funktionieren. 

Nach erfolgreichem Aufruf 
finden wir an der Adresse 
Äbuffer die Struktur AvailFont- 
Header. Sie enthält nur eine 
einzige Komponente: 

WORD afh_NumEntries 
die Anzahl der gefundenen Zei¬ 
chensätze. Gleich hinter dieser 
Struktur im Buffer ist für jeden 
Zeichensatz eine AvailFonts- 
Struktur (Listing 20) angelegt. 
Diese enthält neben dem 
»Fundort« (AFF_DISK, AFF_ 


MEMORY), die TextAttr- 
Struktur. Wie die TextAttr- 
Struktur aufgebaut ist und wel¬ 
che Bedeutung die einzelnen 
Komponenten haben, geht 
ebenfalls aus Listing 20 hervor. 
SetFont(RP,&TextFont) aktiviert 
einen neuen Zeichensatz. Ne¬ 
ben der Angabe des RastPorts 
verlangt diese Funktion die 
Adresse einer TextFont- 
Struktur, wie sie im Headerfile 
graphics/text.h definiert ist. 

Für Zeichensätze, die im 
Speicher abgelegt sind, erhal¬ 
ten wir solch einen Zeiger mit 
dem Aufruf der Funktion Open- 
Font(&TextAttr). Für Disk-Fonts 
ist OpenDiskFont(&TextAttr) zu¬ 
ständig, allerdings muß hierfür 
die Diskfont-Library geöffnet 
sein: 

ULONG *DiskfontBase; 
DiskfontBase=(ULONG *) 
OpenLibrary (" 
diskfont.library'',0) j 

Beide Male übergeben wir ei¬ 
nen Zeiger auf die TextAttr- 
Struktur und erhalten einen Zei¬ 
ger auf die TextFont-Struktur 
zurück. 

Dabei spielt es keine Rolle, 
ob Sie die Adresse einer selbst 
vereinbarten TextAttr-Struktur 
oder die einer mittels Avail¬ 
FontsO erzeugten übergeben, 

Die Funktion AskFont(RP,& 
TextAttr) initialisiert die TextAttr- 
Struktur an der angegebenen 
Adresse mit den Informationen 
des aktuellen Zeichensatzes. 
Ein Aufruf der Funktion Add- 
Font(&TextFont) hängt der Zei¬ 
chensatz-Liste einen neuen 
Zeichensatz an. Das Gegen¬ 
stück dazu, RemFont(&Text- 
Font), löscht den entsprechen¬ 
den Zeichensatz aus der Liste. 

Ein nicht mehr benötigter 
Zeichensatz belegt so lange 
wertvollen Speicherplatz, bis 
man ihn mit CloseFont(&Text- 
Fbnt) endgültig verabschiedet. 

Pointer für 
jedes Window 

Die Funktion SetPointer(& 
Window,&data(0],h,b,x,y) er¬ 
laubt die Definition eines eige¬ 
nen Mauszeigers im angegebe¬ 
nen Window. Dieser Zeiger ist 
immer dann sichtbar, wenn sich 
das Window aktiviert (siehe 
auch Listing 21). 

Die Parameter dieser Funk¬ 
tion von links nach rechts; die 
Adresse des Fensters, in dem 
der neue Pointer sichtbar sein 
soll, die Adresse des Daten¬ 
blocks, der die Pointerdaten 
enthält, die Höhe des Pointers, 
die auf 16 Pixel beschränkte 
Breite und die x/y-Koordinate 
der linken oberen Ecke des so- 


/* 

\\ Snake - denonatrlert Pointer i Sprites 
*/ 

»include "TOOL.h' 

#define VP ACTIVE_SCREEN->ViewPort 
#define HP tfin->RPort 

SHORT xpos,ypos,lastx[90],lasty[90],tail,len,points; 
UWORD *CP, »CB; 

WORD Pointer[]=[ 

0,0, OxFFFF.O, OjOxFFFF, OxFFFF.OxFFFF, 0,0 

IJ 

WORD 

0,0, 0x1800, 0x2000, 0x1000,0x6000, 0x8000,0xF200, 

0x8000,OxFEOO, 0x0200,OxFEOO, 0x7000,0x7000, 
0x3800,0x3800, 0,0 

jj 

struct Window »win; 
struct SimpleSprite Sprite»( 

NULL,7,10,10,2 

h 

VOID error(nieldung) 

STRPTR raeldung; 

( 

if{meldung) printf('Kann Js nicht öffnen',meldung); 
if{CP) FreeMein{CP,si 2 eof( Pointer)); 
if(CB) FreeMein{CB,8izeof(Ball)); 

if(win) C108eUindow(win); 

OloseLibO; 

exit(O); 


VOID Score 0 

[/* Spielstandsanzeige in Form eines Balkens »/ 

SHORT col=pointB>8?3:2, 

topawln->Helght-((win->Helght-10)/10)»polnt8; 

Blook(RP,l,0,10,10,wln->Height); 

Block{RP,col,2,top,8,wln->Helght-2); 


VOID InitO 

(/* ein neues Spiel beginnt */ 

SHORT i; 

tall>points>0; 

xpo8=ypo3»10; 

lens(win->Width+win->Height)/10; /» Länge von 

WindowgrOBe abhängig »/ 
for{i»0;i<len;i+4) lastxti]=lasty[l)»0; 

SetRast(RP,0); /• RastPort 

löschen */ 

RefreshWindowFrarae(win); /• Rahmen, Titelleiste, Gadgets 

refreshen »/ 

Score0; 


VOID mainO 
( 

SHORT l,x=2,y=l,SpriteNr,tip,col*2; 

USHORT Code; 

ULONG claas=0,idcmp=CLOSEWINDOWl NEWSlZEl MOÜSEBUTTONS, 

flag8=MIND0WCL0SEl WINDOWDEPTHi WINDOWSIZINGl RHBTRAP 
lACTIVATE; 

if(0penLib()) error('Lib's'); 

ifÖ (wln=GetWlndow(NULL,0,0,640,80,idcrap.flags, 'Snake',0))) error 
(*Window'); 

if( (CP=Alloc}1em(sizeof(Pointer) ,HEMF_CHIP) )==0) error('Chip- 
Memory') ; 

if ((CB=:AllocMein(siaeof{Ball) ,HEMF_CHIP) )*=0) error( 'Chip- 
Memory') ; 

for(i=0;i<10;i-H-) CP[i]=Pointer[i]; /» Daten ins Chip-Memory 
kopieren »/ 

for(l=0;i<18;i++) CB[i]=Ball[i]; 

Sprite.posctldata=&CB[0]; /* Adresse Sprite-Daten 

bekanntgeben »/ 

SetRGB4(&VP, 21,12,12,12); 

SetRGB4ÜvP, 22,10,10,10); 

SetRGB4(&VP, 23, 8, 8, 8); 

Listing 21. Spiele sind das Hauptanwendungsgebiet für 
Sprites 
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SetPolnter(wln,&CP[0],3>l6>0j0)j /* Mauspolnter verändern */ 
SpriteNr=GetSprite(^Sprite,2); 

InitOj 

tfhlle( dass! =CLOSEUINDOW) { 

elass=CetHessage(win,&code,0,0); 

If(class==NEWSIZE) Init(); /» Fenstergrööe wurde 

verändert */ 

MoveSprlte(4VP,&Sprlte,xpo8+=x,ypos+=y); /* neue Sprite- 
Position */ 

lastx[tail]=xpoa+8-x; ‘ /« l. Position des 

Schweifs »/ 

lasty[tall]=ypos+2-y; 

SetDrMd(RP,JAMll COMPLEMENT); 

DrawElllpse(RP,lastx[tall],la8ty[tallj,2,l); /* Kopf des 

Schweifs */ 

tail=tail>len-2?0:tall+lj 

tip =tail>len-2?0:tall+l; /* Ende des Schweifs 

löschen: */ 

if(lastx[tip]+la8ty[tip]) DrawEllipse(RP,la8tx[tip], 

la 8 ty[tip], 2 ,l); 

if(xpo8>*wln->Width-l6) x=-2; /* Bewegung 

nach links */ 

eise lf(xpos<*10) x= 2} /* Bewegung 

nach rechts »/ 

if(ypos > awin-> Height-8) ( 

y=“li /» Bewegung nach oben »/ 

points++! 

if(polnts>9)i 

SetWindowTltles(win, *> > OAHE-OVER << 

Klick...',-1); 
do( 

Wait (1< < Win- > UserPort- > nip_SigBit); 
clas8aGetMes8age(win,&code,0,0); 

] while((Code 1»SELECTUP)i&(olass1»CLOSEWINDOU))j 

SetWindowTitles(win, 'Snake",-1)j 

InitO; 

) 

eise ScoreOj 

) 

eise if(ypo3<=10) y»i} /» Bewegung 

nach unten »/ 

if((win->MouseY>»ypos+9)&&(win->MouseY<=ypo8+ll)) 

( /* Schläger •/ 

if{(y>0)&&(xpos>win->HouseX-12)&4{xpos< 
win->MouseX+28)) y—li 

j 

1 

FreeSprite(SprlteNr)j 
error(O); 

] 

Listing 21. (Schluß) 


genannten Hot-Spots. So be¬ 
zeichnet man die empfindliche 
Stelle im Mauszeiger, mit der 
Sie zum Beispiel ein Work- 
benchobjekt anwählen können. 

Unklar ist noch das Ausse¬ 
hen des Datenblocks. Es han¬ 
delt sich um ein UWORD-Array, 
dessen beiden ersten und bei¬ 
den letzten Elemente gleich 0 
sein müssen. 

Zwischen diesen, für das Sy¬ 
stem reservierten Arrayelemen- 
ten, befindet sich die »Beschrei¬ 
bung« des Pointersprites. Sie 
haben richtig gelesen, der 
Mauszeiger ist nichts anderes 
als einer der acht zur Verfügung 
stehenden Hardwaresprites. Er 
trägt die Nummer 0. Ein Hard¬ 
waresprite besteht aus maximal 
drei Farben. Aus Tabelle 3 geht 
hervor, daß immer zwei Sprites 
auf die gleichen Farbregister 
zugreifen. Die Farben des Poin¬ 
ters sind in den Farbregister 
17-19 zu finden. Das oben an¬ 
gesprochene Datenarray ent¬ 
hält als Beschreibung für jede 


Zeile des Pointers zwei hinter¬ 
einanderliegende, 16 Bit breite 
Werte. 

Stellen Sie sich nun bitte die 
beiden Werte in binärer Form 
untereinander vor, etwa so: 

igllOOlOlOOlllOOll 

jSlOOllllOOllOOllO 

Lesen Sie die senkrecht 
übereinanderliegenden Bits 
von unten nach oben. Liegen 
zwei Nullen (00) übereinander, 
so ist der Sprite an dieser Stelle 
der Zeile durchsichtig, der 
Punkt ist nicht gefärbt. Finden 
Sie (von unten nach oben) die 
Bits 01, so ist dieser Punkt in der 
Farbe des ersten (%01=1) zu¬ 
ständigen Registers gefärbt (Ta¬ 
belle 10). Die Bits 10 verweisen 
auf das zweite (%10=2) und 
schließiich die Kombination 11 
auf das dritte (%11=3) Farbregi¬ 
ster. 

Schauen wir uns die Daten 
des Pointers in Listing 21 an. 
Sie finden sie gleich am Anfang 
des Listings im Array Pointerf]. 


Die erste Zeile, bestehend aus 
OxFFFF und 0, ist in der Farbe 
des Registers 17 gefärbt (%01), 
die zweite Zeile, 0 und OxFFFF, 
in der des Registers 18 (%10) 
und die dritte Zeile, zweimal 
OxFFFF, in der des Farbregi- 
sters Nummer 19 (%11). 

Der drei Zeilen hohe Pointer 
enthält keine transparente Zeile 
(®/oOO). Vor und hinter den not¬ 
wendigen sechs Elementen 
sind jeweils die beiden 
O-UWORDs angegeben. 

Beachten Sie, daß alle Sprite- 
daten, also auch die des Poin¬ 
ters, im CHIP-Memory liegen 
müssen. 

Bleiben wir doch noch bei 
den Sprites. Diese Minigrafi¬ 
ken, Sie kennen Sie aus Spie¬ 
len, können völlig frei auf dem 
Bildschirm bewegt werden. Li¬ 
sting 21 verdeutlicht das Arbei¬ 
ten mit SetPointerO und Sprites. 
»Snake« ist ein kleines Spiel. 
Ein Sprite, in Form eines Balls, 
reflektiert an den Seiten des 
Windows, dabei zieht er einen 
Schweif hinter sich her. Ihre 
Aufgabe ist es, dafür zu sorgen, 
daß der Ball den Window-Bo¬ 
den nicht berührt. 

Als Hilfsmittel steht Ihnen da¬ 
für der als Break-Out-Schläger 
modifizierte Pointer zur Verfü¬ 
gung. Springt der Bail doch ein¬ 
mal auf den Boden, so wächst 
die Game-Over-Säule am lin¬ 
ken Feldrand ein wenig. Diese 
Säule färbt sich rot und warnt 
Sie, wenn das Spielende kurz 
bevorsteht. Die Länge des 
Schweifs ist abhängig von der 
Fenstergröße. 

Wie weiter oben bereits an¬ 
gedeutet, können wir auf dem 
Amiga acht Hardware-Sprites 
definieren. Wenn Sie alle Spri¬ 
tes so auf den Bildschirm brin¬ 
gen, daß sie sich teilweise ver¬ 
decken, ist das Sprite mit der 
niedrigeren Nummer immer vor 
dem mit der höheren Nummer 
zu sehen. Diese Prioritäten sind 
festgelegt und nicht veränder¬ 
bar. 

Spritesdürfen maximal 16Pi- 
xel breit, aber beliebig hoch 
sein. Die Größe der Pixel ist von 
der Screenauflösung unabhän¬ 
gig. Ein Spritepixel entspricht 
immer einem Bildschirm-Pixel 
im LoRes-Modus. Ein Screen 
muß für die Verwendung von 
Sprites vorbereitet sein, das ge¬ 
schieht durch das Setzen des 
SPRITES-Flags in der New- 
Screen-Strukturkomponente 
ViewModes. Wie aus Listing 21 
hervorgeht, ist der Workbench- 
screen schon vorbereitet. 

Nach der Vereinbarung ver¬ 
schiedener Variablen, erfolgt in 
Snake.c die Initialisierung der 
SimpleSprite-Struktur. Sie be¬ 
steht aus folgenden Kompo¬ 


nenten: einem Zeiger auf die im 
CHIP-Memory liegenden Spri- 
tedaten, die Höhe des Sprites, 
die x/y-Position und die Num¬ 
mer des Sprites. 

Das Aussehen der Spriteda- 
ten haben wir gerade bei der 
Veränderung des Mauszeigers 
besprochen. Beachten Sie bit¬ 
te, daß Sie für jedes Sprite ei¬ 
nen eigenen Datenblock ver¬ 
einbaren müssen, auch wenn 
Sie mit mehreren gleich ausse¬ 
henden Sprites arbeiten möch¬ 
ten. Die Struktur SimpteSprite 
ist im Includefile graphics/spri- 
te.h definiert. Bevor wir unser 
Sprite auf dem Bildschirm dar¬ 
steilen können, müssen wir es 
noch »reservieren«: 

SprlteNr=GetSprlte 

(&Sprite,2); 

Nicht nur für 
Spieler: Sprites 

GetSpriteO verlangt als Para¬ 
meter einen Zeiger auf die 
SimpleSprite-Struktur und die 
gewünschte Spritenummer. Ist 
das Sprite mit dieser Nummer 
noch frei, so entspricht auch 
der Returnwert dieser Nummer. 
GetSpriteO liefert -1, wenn das 
Sprite bereits reserviert war. 

Bei der Angabe von -1 als 
Spritenummer liefert die Funk¬ 
tion die Nummer des nächsten 
freien Sprites, Für die Darstel¬ 
lung und die Bewegung der 
Sprites ist MoveSprite(&VP, 
&SSprite,x,y) zuständig. VP ist 
dabei ein Zeiger auf die View- 
Porl-Struktur des Screens, 
SSprite zeigt auf die Simple¬ 
Sprite-Struktur und x/y ist die 
gewünschte Position des Spri¬ 
tes. 

ChangeSprite(&VP,&SSprite, 
&data[0]) verändert das Ausse¬ 
hen des Sprites mit der ange¬ 
gebenen SimpleSprite-Struk¬ 
tur. Der dritte Parameter zeigt 
auf das Array mit den neuen 
Spritedaten. 

Ein einzelnes Sprite läßt sich 
mit FreeSprite(SpriteNr) lö¬ 
schen. Der Parameter ist die 
von GetSpriteO gelieferte Spri¬ 
tenummer. Das Makro OFF_ 

SPRITE läßt alle Sprites ver¬ 
schwinden, indem es einfach 
den DMA-Kanal abstellt. Das 

Gegenstück ON_SPRITE 

stellt den Urzustand wieder her. 

Wie aus Tabelle 10 ersichtlich 
ist, greifen immer zwei Sprites 
auf die gleichen Farbregister 
zu. Ein solches Sprite-Paar 
kann man zu einem einzigen 
Sprite verbinden, einem soge¬ 
nannten Attached-Sprite. Beide 
Sprites müssen wir an die glei¬ 
che Bildschirmposition brin¬ 
gen. Da eine Zeile eines Sprites 
durch zwei UWORDs darge- 
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C-Kms 


Hardwaresprites 


Sprites 

Register für Farbe 

1 

2 

3 

0 und 1 


17 

18 

19 

2 und 3 


21 

22 

23 

4 und 5 


25 

26 

27 

6 und 7 


29 

30 

31 


Tabelle 10. Die Farbregisternummern der Sprites 


Ansteuern der BitPlanes 


Wert dez Wert bin BitPlane 



Tabelie 11. Die Auswahl der Bitplanes erfolgt mittels 
PlanePIck und PlaneOnOff 


etruot Border 

i 

SHORT LeftEdge, TopEdge; /* Position der linken oberen Ecke des 
Rahmens */ 

UBYTE FrontPen, BackPen, /• APen und BPen »/ 

DrawMode; /* der Zeichenmodus */ 

BYTE Count; /* die Anzahl der Eckpunkte */ 

SHORT *XY; /» Adresse des Arrays» mit den Koordinaten der 
Eckpunkte */ 

struct Border «NextBorderj /* Adresse der nächsten 

Borderatruktur »/ 


Listing 22. Die Borderstruktur ist in »Intuition.h» definiert 


stellt wird, liegen bei zwei Spri¬ 
tes vier UWORDs übereinan¬ 
der. Mit 4 Bit, die einem Pixel ei¬ 
nes Attached-Sprites entspre¬ 
chen, können wir 16 Zustände 
darstellen. Das ergibt unsere 15 
Farben, gespeichert in den 
Farbregistern 17-31 und trans¬ 
parent, wenn alle Bits auf Null 
gesetzt sind. 

Die beiden höherwertigen 
Bits stammen von dem Sprite 
mit der höheren Nummer. Die 
Farben werden sichtbar, wenn 
Sie in beiden Spritedaten- 
Arrays das Attached-Bit setzen: 
Data[1]=SPRITE_ATTACHED. 

Intuition 
und Grafik 

Auch Intuition verfügt über ei¬ 
nige interessante Grafikfunktio¬ 
nen. In diesem Abschnitt be¬ 
sprechen wir die Borders, die 
Images, Intuition-Text und die 
Veränderung des Mauszeigers. 

Die Handhabung dieser 
Funktionen scheint vielleicht zu 
Beginn etwas umständlich, es 
müssen beispielsweise vor 
dem ersten Aufruf Strukturen 
und Arrays definiert werden. 
Bei näherem Hinsehen ist aber 
- wie immer - alles »halb so 
wild«. 


Beginnen wir mit den Bor¬ 
ders. Der Name läßt das Ein¬ 
satzgebiet erahnen: das Zeich¬ 
nen von Umrahmungen. Die 
Funktion »DrawBorder(RP, 
&border,x,y)« zeichnet einen 
oder mehrere Rahmen. Para¬ 
meter sind, neben der Adresse 
des RastPorts RP und der x/y- 
Position der linken oberen Ecke 
des Rahmens, ein Zeiger auf 
die Borderstruktur. Listing 22 
zeigt diese Struktur mit der Be¬ 
deutung der einzelnen Struk¬ 
turkomponenten. Left- und To¬ 
pEdge. Front- und BackPen so¬ 
wie der Zeichenmodus sind Ih¬ 
nen mittlerweile ein Begriff. 
Count ist die Anzahl der Eck¬ 
punkte, einschließlich Anfangs¬ 
und Endpunkt. Ein geschlosse¬ 
nes Viereck hat demnach den 
Count-Wert 5. 

Die einzelnen x- und y-Werte 
der Koordinaten sind in einem 
SHORT-Array gebunden. Ein 
Beispiel für unser Viereck: 

SHORT XY[]=[ 

100,100, 

150 , 100 , 

150 . 150 , 

100 . 150 , 

100,100 

]; 

Der erste Wert ist die x-l^r- 


struct Image 

I 

SHORT LeftEdge, TopEdge, /» Position der linken oberen Ecke des 
Images »/ 

Width, Helght, Depth; /» ... und dessen Breite, Höhe 
und Tiefe »/ 

USHORT *ImageData; /* die Adresse der 

Inagedaten */ 

UBYTE PlanePIck, PlaneOnOff; /» Verknüpfung mit den 

Bitebenen */ 

struct Image «Nextlmage; /* die Adresse eines weiteren 

Images */ 


Listing 23. Die Image-Struktur enthält Informationen über 
das Aussehen einer Kleingrafik 


dinate des Anfangspunktes, 
der zweite Wert dessen y-Koor- 
dinate etc. 

Die Werte des Anfangspunk¬ 
tes addieren sich zu den Para¬ 
metern X beziehungsweise y 
der DrawBorderQ-Funktion und 
zu den Variablen Left- bezie¬ 
hungsweise TopEdge der Bor¬ 
derstruktur. 

Die Adresse des Koordina- 
ten-Arrays tragen wir in das 
nächste Element der Border¬ 
struktur ein: SHORT *XY. 
Möchten Sie gerne mehrere 
Rahmen miteinander kombi¬ 
nieren, verketten Sie die Struk¬ 
turen, indem Sie die letzte l^m- 
ponente mit einem Zeiger auf 
die folgende Border-Struktur 
belegen. Ansonsten tragen Sie 
dort NULL ein. Wir begegnen 
der Borderstruktur noch einmal 
weiter unten, wenn wir uns mit 
den Gadgets beschäftigen. 

Auch die Images werden dort 
noch einmal interessant. Ima¬ 
ges sind kleine Grafiken, die 
beispielsweise bei einem Gad- 
get auf dessen Funktion hin¬ 
deuten, zum Beispiel die 
Depth-Gadgets. 

Die Definition eines Images 
erinnert an die eines Borders: 
Wir müssen eine Image-Struk¬ 
tur initialisieren, ein USHORT- 
Array enthält die Daten des 
Images und die Funktion Draw- 
lmage(RP,&image,x,y) schließ¬ 
lich, bringt die Kleingrafik auf 
den Bildschirm. 

Schauen wir uns zuerst die 
Image-Struktur (Listing 23) an. 
Nach den »alten Bekannten«, 
wie Position und Dimension, 
müssen wir mit der Variablen 
Depth die Tiefe, das heißt die 
Anzahl der Image-Bit-Ebenen, 
festlegen. Natürlich kann Depth 
die in der NewScreen-Struldur 
vereinbarte Anzahl der BitEbe- 
nen nicht überschreiten. 

Es folgt die Adresse der 
Image-Daten. Für jede der un¬ 
ter Depth vereinbarten BitPla¬ 
nes muß eine eigene Bildbe¬ 
schreibung in Form eines Da¬ 
tenpakets in einem USHORT- 
Array zur Verfügung gestellt 
werden. 


Betrachten wir zunächst Ima¬ 
ges mit einer einzigen BitPlane, 
die eine Breite von 16 Pixel 
nicht überschreiten. 

Die Pixelhöhe, und somit 
auch die Variable Height der 
Image-Struktur, einer solchen 
Kleingrafik ist in diesem Fall 
identisch mit der Anzahl der 
Elemente des Arrays. Jedes 
Arrayelement beschreibt eine 
Zeile der Grafik. Ein gesetztes 
Bit in einem Element bedeutet 
ein gesetzter Punkt In einer 
Zeile. 

Das Array enthält sozusagen 
das Bitmuster unserer Grafik. 
Die Variable Width enthält die 
Image-Breite in Pixel. Setzen 
wir Depth auf 2, arbeiten wir al¬ 
so mit zwei BitPlanes, müssen 
wir die Anzahl der Array-Ele- 
mente verdoppeln. Die zweite 
Hälfte der Elemente beschreibt 
dabei das Bitmuster der zwei¬ 
ten BitPlane. Bildlich gespro¬ 
chen liegt diese über der ersten 
BitPlane. 

Wir reduzieren nun Depth 
wieder auf eins und benutzen 
eine einzige BitPlane. Dafür soll 
unsere Grafik 21 Pixel breit 
sein. Wir müssen die Variable 
Width entsprechend einstellen. 

Beachten Sie, daß Height nur 
eine Aussage über die Höhe 
der Grafik macht, nicht aber 
über die Anzahl der Array-Ele- 
mente. Jetzt sind zwei Elemen¬ 
te pro Grafik-Zeile nötig. Das er¬ 
ste Element beschreibt die er¬ 
sten 16 Bit der Zeile und die 5 
höchsten Bit des zweiten Ele¬ 
ments den Rest. 

Mit Hilfe der Variablen Plane- 
Pick und PlaneOnOff können 
wir entscheiden, mit welchen 
BitPlanes wir arbeiten möch¬ 
ten. 

PlanePick bestimmt die Pla¬ 
ne, in der die Grafik erscheinen 
soll. Dagegen wird jedes Pixel 
der mit PlaneOnOff gewählten 
Plane auf 1 gesetzt. Die BitPla¬ 
nes selektiert man durch Set¬ 
zen einzelner Bits in PlanePick 
beziehungsweise PlaneOnOff. 

Tabelle 11 zeigt die mögli¬ 
chen Werte für das Arbeiten mit 
zwei BitPlanes. Die passenden 
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/• 

\\ Smlly - demonstriert Border und Image 
*/ 

#inolude 'TOOL.h' 

#define RP win->RPort 
#deflne XPOS uin->Mou8eX 
#deflne YPOS tfin->MouseY 

USHORT «CData; 

USHORT FData[]*[ /» Image-Daten »/ 

0,0,0,0,252,0,771,0,1024,32768,2048,16384,4096,8192, 
4300,8192,4402,8192,8192,4096,8192,4096,9729,36864, 
8705,4096,4354,8192,4348,8192,4216,8192,2048,16384, 
1024,32768,771,0,252,0,0,0,0,0 
]5 

SHORT RData[2][10]={ » Border-Daten »/ 

0,0, 40,0, 40,40, 0,40, 0,0, 

0,0, 30,0, 30,50, 0,50, 0,0 

1j 

struct Image Bild =[ 

9,15, 22,22,1, NULL, 2,1, NULL 
!i 

struct Border Rahmen[23=[ 

0,5, 1,0, JAMl, 5, &RData[0][0], NULL, 

5,0, 3.0, JAMl, 5, 8cRData[l][0], 8iRahmen[0] 


VOID error(Heldung) 

STRPTR Meldung; 

1 

If(Meldung) printf('Kann Xs nicht öffnen',Meldung); 
If(CData) FreeMem(CData,sizeof{FData)); 

CloseLibO; 
exit(O); 


VOID malnO 

( 

struct Window »win; 

SHORT l,x,y; 

USHORT code=0; 

if(OpenLlb()) error ('Hb's'); 

if((CData«AllocMem( 8 i 2 eof(FData),MEMF_CHIP))==0) error('Chip- 
Memory'); 

for(ia0;i<44;i-t-f) CData[l]»FDataCi]; /* Image-Daten ins 
CHIP-Memory */ 

Bild.ImageOata»CDeta; /* neue Adresse der Daten im 

CHIP-Memory »/ 

wlr=ACTIVE_WlMD0W; /» Arbeiten im gerade aktiven 

(CLI) Fenster */ 

ModlfyIDCMP(wln,M0USEBUTT0NSlM0USEM0VE);/« CLI-Fenster reagiert 
auf Maus */ 

while(codel*SELECTDOWN)I /* Warten auf 

Mausklick »/ 

GetMessage(uln,&code,0,0); 

DrawImage(RP,SBild,XPOS,YPOS); /» 

Minigrafik zeichnen »/ 

DrauBorder(RP,&Rahnien[ll,XPOS,YPOS); /» doppelter 

Rahmen zeichnen »/ 

) 

ModifyIDCMP{wln,0); 

error(O); 


Listing 24. »Smily.c« arbeitet mit Border und Image 


Werte für einen Screen mit 
mehr als zwei BitPlanes lassen 
sich daraus ableiten. 

Listing 24 sollte die letzten 
Fragen beseitigen. Starten Sie 
»Smily« aus dem CLI-Fenster. 
An der aktuellen Mausposition 
erscheint ein mit Border einge¬ 
rahmter »Smily«. Solange Sie 
die linke Maustaste nicht betäti¬ 
gen, erscheint, immer wenn Sie 
die Maus bewegen, die Figur 
an der Spitze des Pointers. Kön¬ 
nen Sie durch einen einzigen 
Funktionsaufruf erreichen, daß 
das Programm vor jedem Neu¬ 


zeichnen die alte Figur löscht? 
Verändern Sie ruhig einmal die 
einzelnen Variablen der Struk¬ 
turen und Arrays in »Smily.c«, 
um zu sehen, wie sich darauf¬ 
hin die Grafik verändert. 

Zwei Funktionen in diesem 
Programm haben wir noch 
nicht besprochen: 

Speicher=AllocMera(Bytes, 

Flags); 

FreeMem(Speicher,Bytes); 

AllocMemO reserviert einen 
Speicherbereich von der Grö¬ 
ße, die der erste Parameter be- 


/* 

\\ AMem - Kontrolle des Arbeitsspeichers 
*/ 

#lnclude 'TOOL.h' 

struct Window *win; 

UBYTE mera[40]; 
struct IntulText IText=( 

1,0,JAM2,0,0,NULL, (UBYTE »)mem,NUU 

1 ; 

VOID error(Meldung) 

STRPTR Meldung; 

1 

If(Meldung) prlntf('Kann ia nicht öffnen',Meldung); 
If(wln) Clo8eWlndow(wln); 

CloseLibO; 

exit(O); 


VOID malnO 

l 

ULONG flaga=WINDOWDEPTHl WINDOWDRAGl WIMD0WCL0SE,class; 
if(OpenLib()) error ('Lib's'); 

ifO(wir»GetWindow{MULL,273,0,317,10,CLOSEWINDOW,flags, 
MULL,NULL))) 

error('Window'); 

do| 

sprlntf(mero,' Chip: *d Fast: *d ',AvallMem(KEMF_CHIP), 
AvallMeiii(MEMF_FAST)); 
PrintIText(win->RPort,&IText,30,l) ; 

Delay(30); 

class<GetMe8sage(wln,0,0,0}; 

] while( dass! =CL0SEUIND0W); 
error(O); 


Listing 25. Prüfen Sie mit AMem, ob Ihr Programm alle 
Ressourcen freigibt. Starten Sie das Programm bitte mit 
»RUN AMem«. 


schreibt. Die Flags sind im Hea¬ 
derfile »exec/memory« verein¬ 
bart, weshalb wir dieses File in 
Tool.h unter Headerfiles einge¬ 
fügt haben. 

Folgende Flags sind mög¬ 
lich: »MEMF_PUBLIC« be¬ 
deutet, daß der Speicherbe¬ 
reich nach der Zuweisung nicht 
mehr verschoben werden darf. 

»MEMF_CLEAR« füllt den 

Speicherbereich vor der Zuwei¬ 
sung mit Nullen.» MEMF_ 

FAST« legt den Speicherbereich 
außerhalb des Chip-Memory. 
Dies ist natürlich nur mit einer 
RAM-Enweiterung sinnvoll. 
»MEMF_CHIP« legt den Spei¬ 

cherbereich ins Chip-Memory. 

Die sogenannten Custom- 
Chips, beispielsweise der Blit- 
ter, können nur auf Daten zu¬ 
greifen, die sich im Chip- 
Memory befinden. Dies sind 
zur Zeit die untersten 512 KByte 
des gesamten Speichers. 

Bei der Verwendung einer 
RAM-Erweiterung werden 
möglichst viele Daten im Fast- 
Memory gespeichert, um das 
Chip-Memory zu entlasten. Wir 
müssen also, um sicher zu ge¬ 
hen, unsere Image-Daten, auf 
die der Blitter Zugriff haben 
muß, in diesen Speicherbereich 
kopieren {siehe Listing 26). 


FreeMemO gibt später den 
Speicherbereich wieder frei. 
Parameter sind dabei die 
Adresse des Speicherbiocks 
und deren Größe in Bytes. 

Wie bereits mehrfach ange¬ 
sprochen, ist es sehr wichtig, 
beim Programmende den be¬ 
nutzten Speicher wieder freizu¬ 
geben. Um eine bessere Kon¬ 
trolle zu haben, vergleichen Sie 
den freien Speicher vor dem 
Aufruf und nach Beendigung 
Ihres Programms. Eine genaue 
Speicheranzeige liefert AMem 
(Listing 25). Binden Sie es am 
besten in die Startup-Sequence 
ein: 

RUN AMem 

AMem gibt die Größe noch 
verfügbaren Speichers, unter¬ 
teilt in Chip- und Fastmemory, 
in einem eigenen Window aus. 

Weiter oben haben wir die 
Textfunktionen aus der Gra- 
phics-Library besprochen. Un¬ 
ter Intuition finden wir ebenfalls 
eine Textfunktion. 

PrintlText(RP,&intuitext,x,y) 
schreibt einen Text an die ange¬ 
gebene Position des RastPorts. 
In Listing 25 geben wir so die er¬ 
mittelten Werte für Chip- und 
Fastmemory aus. Der zweite 
Parameter verweist jedoch 
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struot IntulText 

I 

UBYTE FrontPen, BackPen, DrawMode; /* Farben und 
Zeichenmodus •/ 

SHORT LeftEdge, TopEdge; /» die Position des Textes */ 

struet TextAttr »ITextFontj /* der 

Zeichensatz »/ 

UBYTE »IText; /* der auszugebende Text »/ 

struet IntuiText *NextTextj /» die nächste IntuiText-Struktur »/ 
)J 

Listing 26. Textausgabe unter Intuition: 
die IntuiText-Struktur. 


struet lODRPReq { 

struet Message io_Message^ 
struot Device *lo_J>evice; 
struet Unit •lo_Unit; 

UVORD io.Comniand; /» das Kommando} hier DumpRastPort */ 

UBHE io_Flags; 

BYTE iojrror; /* lO-Error (siehe Tabelle 10) */ 

struot RastPort »ioJastPort} /* Adresse des RastPorts «/ 

struot ColorMap »lo_ColorHap; /* Adresse der ColorMap »/ 

ULONG iojlodes} /* der Soreenmodus, zum Beispiel HIRES »/ 

UWORD lo_SroXj /* linke Seite des auszugebenden Rechtecks */ 
UWORD io_SrcY}/* obere Seite des Rechtecks, bezogen auf Screen »/ 
UWORD lo_SrcWidth; /» die Breite des Bereichs im RastPort »/ 
UWORD io_SrcHeight} /« die Höhe des Bereichs Ira RastPort •/ 

LONG io_DestCol8; /« die Breite des Bereichs auf dem Drucker */ 
LONG io_DestRows; /» die Höhe des Bereichs auf dem Drucker »/ 
UWORD io_Special} /» die speziellen Druck-Modi (Tabelle 11) »/ 

ij 

Listing 27. in der lODRPReq-Struktur muß man den 
RastPort beschreiben, den man ausdrucken möchte 


Die Druckerfehler 

FehlerNr 

Bedeutung 

1 

Abbruch durch User 

2 

kein Drucker angeschlossen 

3 

keine Invertierung im HAM-Modus 

4 

fehlerhafte Koordinaten 

5 

Ausdruck in dieser Größe nicht möglich 

6 

kein Speicher für Berechnungen 

7 

kein Speicher für Druckerpuffer 


Tabelle 12. Die Drucker-Fehlermeldungen io_Error der 

lODRPReq-Struktur 


nicht auf einen Ausgabetext, 
sondern auf eine IntuiText- 
Struktur (Listing 26). 

Diese Art der Textausgabe ist 
sehr komfortabel, doch gewinnt 
sie erst volle Bedeutung, wenn 
Sie etwas mehr über Gadgets 
und Menüs wissen. 

Vermutlich haben Sie mit den 
oben beschriebenen Funktio¬ 
nen genuö zu tun. Wir möchten 
dennoch nicht versäumen. Ih¬ 
nen ein paar Aufgaben zu stel¬ 
len: 

- Zeichnen Sie Punkte auf ei¬ 
nem RastPort. Die X-Position 
soll vom Mauszeiger, die Y-Po- 
sition vom Elektronenstrahl der 
Bildröhre abhängig sein. 
-Verändern Sie »Flow.c« so, 
daß der Text mit Schatten aus¬ 
gegeben wird. Die SoftStyle- 
Schriftart soll frei wählbar sein 
(Kommandoparameter). Bei 
Betätigung der rechten Mausta¬ 
ste soll der Text mit halber Ge¬ 
schwindigkeit Scrollen. Verän¬ 
dern Sie das Programm so, daß 
es mit verschiedenen (wählba¬ 
ren) Zeichensätzen läuft. 

- Erweitern Sie das Spiel 
Snake um zusätzliche Bälle. 
Bauen Sie Hindernisse auf, an 
denen die Bälle reflektieren 
oder die bei einer l^llision 
verschwinden (Tip: zur Kolli¬ 
sionsüberwachung können Sie 
ReadPixelO einsetzen). 

- Schreiben Sie ein kleines 
Malprogramm mit verschiede¬ 


nen Farben und den bekannten 
Funktionen wie Draw, Line, 
Circle, Block, Fill, Text etc. 

Vielleicht möchten Sie gerne 
Ihre Zeichnungen zu Papier 
bringen oder benötigen Sie für 
Ihr Malprogramm noch eine 
Hardcopy-Routine? Lassen Sie 
uns an dieser Stelle, bevor wir 
dann endgültig zu Intuition zu¬ 
rückkehren, die Tool.h-Funk- 
tion HrdCpyO besprechen. 

1bol.h 

macht Druck 

Der Weg zur Hardcopy führt 
über das Printer-Device. Um 
diesen Weg zu verstehen, müs¬ 
sen Sie natürlich zuerst wissen, 
was ein Device ist. 


Device heißt - wörtlich über¬ 
setzt - Gerät. Es handelt sich 
hier aber nicht um Geräte, wie 
zum Beispiel das Diskettenlauf¬ 
werk oder den Drucker, son¬ 
dern eher um Routinensamm¬ 
lungen ähnlich einer Library. 
Über Device können wir mit 
den gewünschten Geräten in 
Verbindung treten. Vorausset¬ 
zung dafür ist, daß wir das Devi¬ 
ce korrekt öffnen. Dies ge¬ 
schieht, ähnlich wie bei den Li¬ 
braries, mit einer Open-Funk- 
tion: 

Error=OpenDevlce(&name, 
u,&lo,flag) 

Die Variable name steht für 
den Device-Namen) in unse¬ 
rem Fall also "printer. 
device" (Listing 1). Das »u«, es 
steht für Unit (Geräteeinheit). 
Die Flags sind für die Ausgabe 
des RastPorts auf den Drukker 
nicht wichtig, wir übergeben 
daher eine 0. Der noch fehlen¬ 
de Parameter »io« ist die Adres¬ 
se eines fertig initialisierten I/O- 
Datenblockes. 

Die Initialisierung überlassen 
wir der Funktion CreateExtlOO- 
Sie verlangt neben der Größe 
des Datenblocks die Adresse 
eines MessagePorts als Para¬ 
meter. CreatePort(name,pri) 
legt einen MessagePort an. Die 
Parameter hierbei sind ein 
Stringpointer auf den Namen 
des Ports und dessen Priorität. 

Somit ist die Initialisierung 
des Datenblocks, in unserem 


Fall ist dies die Union PrIO, kein 
Problem mehr. Unsere Union 
erhält die drei Strukturen 10- 
StdReq (für normale Textaus¬ 
gabe), lOPrtCmdReq (Com- 
mandRequest) und lODRPReq. 

Die letzte Struktur ist für uns 
wohl am wichtigsten. Sie be¬ 
schreibt den RastPort, der aus¬ 
gegeben werden soll und die 
Art der Ausgabe. Listing 27 er¬ 
klärt zusammen mit Tabelle 12 
und 13 die wichtigsten Kompo¬ 
nenten. 

Nachdem in der Funktion 
HrdCpyO die notwendigen Wer¬ 
te übergeben sind, führt die 
Funktion DoloO das unter 
io_Command angegebene 
Kommando aus. Printer-Device 
erlaubt mehrere Kommandos: 
CMD_WRITE und PRD_ 
RAWWRITE zur Ausgabe von 
Texten, PRD_PTRCOMMAND 
zur Ausgaben von Kommandos 
und PRD_DUMPRPORT zur 
Ausgabe eines RastPorts. 

Nach erfolgtem Ausdruck 
schließen wir alle Ressourcen 
und kehren zurück ins Haupt¬ 
programm. HrdCpyO liefert 
TRUE (1), wenn der RastPort er¬ 
folgreich ausgedruckt werden 
konnte, im andern Falle FALSE 
(0). 

Der Aufruf der Funktion ist 
denkbar einfach: 
struet Screen *scr; 

UWORD l,t,w,h; 

USHORT s; 

BOOL ok; 



Symbol 

Wert 

Bedeutung 

SPECIAL_MILCOLS 

OxOOlL 

io_DestCols entsprechen 1/1000 inch 

SPECIAL-MiLROWS 

0x002L 

io_DestRows entsprechen 1/1000 inch 

SPECIAL_FULLCOLS 

0x004L 

io__DestCols = maximal 

SPECIAL FULLROWS 

OxOOSL 

io_DestRows = maximal 

SPECIAL FRACCOLS 

OxOIOL 

Breite=maximal/io_DestCols 

SPECIAL_FRACROWS 

0x020L 

Höhe =maximal/id_DestRows 

SPECIAL_ASPECr 

OxOaOL 

Seitenverhältnisse ausgleichen 

SPECIAL_DENSITY1 

OxIOOL 

Druckdichte minimal 

SPECIAL_DENSITY2 

0x200L 

Druckdichte gering 

SPECIAL_DENSITY3 

0x300L 

Druckdichte hoch 

SPECIAL_DENSITY4 

0x400L 

Druckdichte maximal 

SPECIAL_CENTER 

0x040L 

Ausdruck zentrieren 


Tabelle 13. Die Spezial-Modt zum Ausdrucken von RastPorts 
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ok=HrdCpy(scr,l,t,w,h,s) 

Dabei ist scr die Adresse des 
Screens, dessen RastPort Sie 
ausgeben möchten. Geben Sie 
NULL an, beziehen sich alle 
Daten auf den aktiven Screen. 
Die Variablen l,t,w und h be¬ 
schreiben die Position der lin¬ 
ken Seite, die der oberen Seite 
sowie Breite und Höhe des ge- 


Bedienungsfreundlichkeit ist 
angesagt, auch bei selbstge¬ 
schriebenen Programmen. Vor¬ 
bei sind die Zeiten, in denen ein 
Rechner den Bediener mit Be¬ 
fehlen, wie »Enter your choi- 
cel«, herumkommandierte - 
jetzt gibt es den Amiga, jetzt 
gibt es Gadgets und Pull-Down- 
Menüs. 

Wir werden auf den folgen¬ 
den Seiten ausführlich die Ein¬ 
satzgebiete und die Program¬ 
mierung dieser von Intuition be- 
reitgestellten Bedienungsele¬ 
mente diskutieren. In diesem 
Rahmen erläutern wir, neben 
vielen Beispielprogrammen, 
weitere »Tool.h«-Routinen. die 
dem C-Programmierer die Ar¬ 
beit erleichtern und den nötigen 
Aufwand auf ein Minimum re¬ 
duzieren können. 

Beginnen wir mit den Gad¬ 
gets. Einige davon, nämlich die 
System-Gadgets, kennen Sie ja 
bereits. Sie haben sich am An¬ 
fang, bei der Besprechung der 
Windows, mit ihnen befaßt (Bild 
2 ). 

Intuition erlaubt neben die¬ 
sen vordefinierten Gadgets 
auch die Benutzung eigener, 
anwendungsspezifischer Gad¬ 
gets in beliebiger Form und 
Größe. Programme, wie zum 
Beispiel Preferences, die mit 
Gadgets nur so gespickt sind, 
erinnern eher an ein Schaltpult 
mit Reglern und Schaltern als 
an ein Softwareprodukt. 

Gleichgültig, ob es sich nun 
um System-Gadgets handelt 
oder um solche, die man selbst 
erzeugt hat, immer hat der An¬ 
wender die Möglichkeit, Ein¬ 
stellungen bequem per Maus¬ 
klick vorzunehmen. 

Die Hauptaufgabe dieser 
Gadgets (laut Wörterbuch 
»Dingsda« oder »Apparat«) ist 
demnach die Weitergabe von 
Nachrichten oder Daten vom 


wünschten Rechtecks im Rast- 
Port. Die Angaben beziehen 
sich auf die linke obere Ecke 
des Screens. Mit dem letzten 
Parameter legen Sie die Größe 
des Ausdrucks fest. Die Größe 
verhält sich proportional zu s. 
Ausnahme: den größten Aus¬ 
druck erhalten Sie bei der An¬ 
gabe von s=0. 


Anwender an ein Programm. 
Diese Nachrichten können 
Zahlenwerte, Texte oder einfach 
nur Boolesche (»ja/nein«-) Ent¬ 
scheidungen sein. Entspre¬ 
chend dieser Aufgabengebiete 
unterscheidet man drei Gadget- 
Typen: Proportional-, Eingabe- 
und Bool-Gadgets. 

Welches Gadget Sie einset- 
zen möchten, wo und in wel¬ 
cher Größe es auf dem Window 
erscheinen soll sowie weitere 
Einzelheiten teilen Sie Intuition 
- wie könnte es anders sein - 
per Gadget-Struktur mit. 

Intuition venAraltet alle Gad¬ 
gets eines Windows mittels ei¬ 
ner Liste, bestehend aus verket¬ 
teten Gadget-Strukturen. Die 
ersten Elemente dieser Liste 
sind immer die System-Gad¬ 
gets. 

Die (NewjWindow-Struktur- 
komponente FirstGadget ver¬ 
weist auf die Struktur des er¬ 
sten User-Gadgets. Alle User- 
Gadgets sind mit dem jeweils 
ersten Strukturelement, dem 
Pointer NextGadget, verkettet 
(Bild 4). Der Pointer des letzten 
Gadgets erhält den Wert NULL. 

Betrachten wir uns die Gad- 



Bild 4. Die (New)Window- 
Struktur enthält das erste 
Glied der verketteten Gad- 
get-Liste 


get-Struktur in Listing 28 etwas 
genauer. Die Variablen Left- 
Edge, TopEdge, Width und 
Height beschreiben, wie auch 
bei den Windows, Position und 
Dimension eines Gadgets. Die 
Position bezieht sich, solange 
kein GREL-Flag gesetzt ist, auf 
die linke obere Ecke des Gad¬ 
gets, innerhalb des zugehöri¬ 
gen Windows. 

Mittels »Flags« werden die 
Grundeigenschaften eines 
Gadgets festgelegt. Wir unter¬ 
teilen die Gadget-Flags in drei 
Gruppen. Die erste Gruppe be¬ 
stimmt, wie die Variablen Left- 
Edge, TopEdge, Width und 
Height zu deuten sind. Es han¬ 
delt sich hier um die oben er¬ 
wähnten GREL-Flags. Ist das 
Flag GRELBCmOM gesetzt, 
so bezieht sich die Variable Top¬ 
Edge nicht mehr auf die Ober¬ 
kante des Windows, sondern 
auf dessen Unterkante. Top¬ 
Edge muß daher in diesem Falt 
einen negativen Wert beinhal¬ 
ten. 

Extras durch 
Gadget-Flags 

Verändert der Anwender 
durch Vergrößern oder Verklei¬ 
nern des Fensters die Position 
der Fensterunterkante, so ver¬ 
ändert sich die Position des 
Gadgets relativ dazu. 


struct Gadget 
1 

struct Gadget *NextGadget; 
SHORT LeftEdge, TopEdgej | 

SHORT Width, Height; 

ÜSHORT Flags; ' 

USHORT Activatlon; I 

ÜSHORT GadgetTVpe; 

APTR GadgetRender; 

APTR SelectRender; 

struct IntuiText »GadgetText; 

LONG MutualExclude; 

APTR Specialinfo; 

USHORT GadgetID; 

APTR UserOata; 

]; I 

Listing 28. Wie alle anderen 
Intuition-Elemente be¬ 
schreibt man ein Gadget , 

mittels einer Struktur | 


struct Proplnfo 
( 

USHORT Flags; 

USHORT HorizPot; 

USHORT VertPot; 

USHORT HorlzBody; 

USHORT VertBody; 

USHORT CWldth; 

USHORT CHeight; 

USHORT HPotRes, VPotRes; 
USHORT LeftBorder; 

USHORT TopBorder; 

]; 

Listing 29. Die kurze Prop- 
Info-Struktur enthält alle 
Informationen über ein 
Proportional-Gadget 


/• 

W StrGad - Demo Text/Int-Gadget 
•/ 

#lnclude 'TOOL.h' 

#define ANZ^ 20 
#define BG 80 
#deflne HG 9 

struct Window *wln; 

UBYTE undo[ANZ_Z],text[ANZ_Z3-'Text*,zahl[ANZ_2]»'0', 
Ueberschrlft[3»'Text-Gadget Int-Gadget'; 

SHORT pos[]»{BG+l,HG+l, BG+l.l, BG,0, BG.HG, 0,HG, l.HG+l, BG+1,HG+ 

1 jj 

struct Border border=( 0,0, 2,0, JAHl, 7, &pos[0], NULL ); 
struct Stringinfo SInfol={ text.undo.O, ANZ_Z,0, 0,0,0,0,0,0,0, 

NUU ] ; 

struct Strlnglnfo SInfo2=(zahl,undo,0, ANZ_Z,0, 0,0,0,0,0,0,0, 

MULL i; 

struct IntuiText GText »(2,0,JAHl,0,-15,NULL,4Ueber8chrift[0], 

NULL J; 

VOID e]:Tor(Heldung) 

STRPTR Meldung; 

( 

if(Meldung) printf('Kann %8 nicht 5ffnenl?l\D',Heldung); 
if(win) CloseWlndow{win); 

CloseLibO; 

exit(O); 

] 

VOID mainO 
[ 

struct Gadget SGad, IGad; /«die beiden Gadgets 
String- und IntGadget •/ 

SHORT ok*0; 

USHORT id; 

ULONG class,idcnp=GADGETUPlM0USEBÜTTONSl CLOSEUINDOW, 

flagS=WIMDOWCLOSEl WIMDOMDEPTHl WINDOWDRAGl WINDOWSIZING 
lACTIVATE; 
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C-Kurs 


if(OpenLlb()) error{'Llb's')} 

If(!(win=GetWindo«(NULL,0,0,230,70,idcrap,flags,Text/ 
Int-Gadgeta',MULL))) 
eTTori ”Vlndow*); 

GetGadget(4SGad,wln,10,40,BG,HG,GADGHC0MP,RELVERIFYlGADGIIOlEDIATE, 
STRGADGET.&border.MULL.&GText.&SInfol,!);/» String- 
Gadget mit TOOL.h */ 

GetGadget(&IGad,win,120,40,BG,HG,GADGHBOX,RELVERIFYi 
GADGIMMEDIATEl LONGINT, 

STRGADGET,&border,NULL,NUIX,6SInfo2,2); /* Int-Gadget 
mit TOOL.h »/ 

ActlvateG8dget(8iSGad,win,NULL); /* Strlng-Gadget 

aktivieren */ 

while(ok==0)[ /* Bedingung ist nach CLOSEGADGET nicht mehr 

erfüllt */ 

tfait(l< <win->UserPort->mp_SigBit); 
clas3xGetHe8sage(vin,0,&id,0); 
swltch(clase)( 

caee GADGETUP:( /* Retumtaste betätigt »/ 

swltoh(id)( 

case 1:[ /* Gadget mit ID Nummer 1: das 

Strlng-Gadget */ 

prlntf('String: lts\n',SInfol.Buffer); 
ActivateGadget(iIOad,wln,NULL); /» 

Int-G aktivieren */ 
break; 

I 

case 2:{ /* Gadget mit ID Nummer 2: das 

Int-Gadget »/ 

prlntf('Zahl: <ld\n',SInfo2.LongInt)} 
ActivateGadget{&SGad,«ln,NULL); /* Str-G 
aktivieren */ 
break; 

] 

1 

break; 

1 

case CL0SEUIND0W:[ 
ok++; 
break; 



) 

error(O); 


Die Variable LeftEdge der 
Gadget-Struktur ist ein positiver 
Wert, der den Abstand zwi¬ 
schen der linken Fensterseite 
und linken Gadget-Seite be¬ 
schreibt. 

Diese ändert sich jedoch, 
wenn Sie das GRELRIGHT- 
Flag setzen. Jetzt interpretiert 
Intuition den in LeftEdge ge¬ 
speicherten Wert als die Diffe¬ 
renz zwischen der rechten Fen¬ 
sterseite und der linken 
Gadget-Seite. Geben Sie in die¬ 
sem Fall für LeftEdge immer ei¬ 
nen negativen Wert an. 

Das Flag GRELWIDTH setzt 
den rechten Rand des Gadgets 
an die Position, die sich aus der 
Summe von LeftEdge und 
Width errechnet, bezogen auf 
den rechten Rand des Fensters 
(siehe auch Listing 29). 

Das letzte Flag in dieser 
Gruppe, GRELHEIGHT, zeich¬ 
net den unteren Rand des Gad¬ 
gets TopEdge+Height Punkte 
vom unteren Fensterrand ent¬ 
fernt. 

Wir kommen zur zweiten 
Gruppe der Gadget-Flags. Hier 


legen wir die Reaktion auf ei¬ 
nen Mausklick fest. Wir haben 
vier Möglichkeiten: 

«GADGHCOMP« steilt das 
Gadget komplementärfarben 
dar. 

»GADGHBOX« zeichnet im 
»JAM1:COMPLEMENT«-Modus 
einen Rahmen um das Gadget. 
Diese Möglichkeit nutzt man 
beispielsweise dann, wenn sich 
die Farbe des Gadgets auch 
beim Anwählen nicht verän¬ 
dern soll. 

Listing 30 demonstriert den 
Unterschied zwischen GAD 
GHCOMP und GADGHBOX. 

»GADGHIMAGE« zeichnet 
entsprechend der Gadget- 
Strukturkomponente Select- 
Render (siehe unten) einen 
neuen Rand oder aber ein völlig 
anderes Image. 

Mit »GADGHNONE« verbie¬ 
ten Sie jede Veränderung des 
Gadgets bei der Anwahl mit der 
Maus. Achtung: Die Flags die¬ 
ser Gruppe lassen sich nicht 
miteinander kombinieren. 

Die letzte Gruppe der 
Gadget-Flags faßt alle Flags zu¬ 


sammen, die sich keiner der 
beiden anderen Gruppen zu¬ 
ordnen lassen. GADGIMAGE 
müssen Sie setzen, wenn auf 
dem Gadget ein eigenes Image 
zu sehen sein soll. Die Pointer- 
variable GadgetRender (siehe 
unten) zeigt dann auf die 
Image-Struktur. Bei der Ver¬ 
wendung von Borders müssen 
Sie GAD-GIMAE nicht setzen. 

»SELECTED« stellt ein Gad¬ 
get im angewählten Zustand 
dar. Beachten Sie, daß ein 
String-Gadget mit gesetztem 
SELECTED-Flag nicht aktiv ist, 
es sieht nur so aus. Mit der 
Auto-Aktivierung von String- 
Gadgets befassen wir uns spä¬ 
ter. 

Das Flag »GADGDISABLED« 
sorgt dafür, daß man das Gad¬ 
get nicht anwählen kann. Die¬ 
ser Zustand wird optisch durch 
eine Darstellung des Gadgets 
in Geisterschrift hervorgeho¬ 
ben. Den Zustand des Flags 
kann man mit den Funktionen 
OnGadget(&gad,&win,&req) 
und OffGadget(&gad,&win,&req) 
noch im nachhinein verändern. 
Leider zeichnet Intuition nach 
dem Aufruf von OnGadgetO nur 
den Gadget-Rahmen oder, 
wenn definiert, das Image neu, 
löscht aber vorher den Gadget- 
Bereich nicht. Die Off-Darstel¬ 
lung bleibt daher zumindest 
teilweise sichtbar. 

Die Parameter der beiden an¬ 
gesprochenen Funktionen sind 
gleich. Es handelt sich um Poin¬ 
ter auf die Strukturen des Gad¬ 
gets. des Windows, dem das 
Gadget erscheinen soll, und 
des Requesters, falls es sich 
um ein Requester-Gadget han¬ 
delt. Bei normalen Window- 
Gadgets übergibt man als drit¬ 
ten Parameter NULL. 

Das nächste Element der 
Gadget-Struktur ist Activation. 
Sie können verschiedene Flags 
setzen und auch miteinander 
kombinieren. Wir besprechen 
sie am besten wieder nach 
Gruppen getrennt. 

Mit Hilfe der ersten Gruppe 
können wir die »Activation« 
nach der Gadget-Anwahl ein¬ 
stellen. 

Gadgets für 
jeden Zweck 

»TOGGLESELECT« verwan¬ 
delt unser Gadget in einen Flip- 
flop-Schalter. Der Zustand des 
Gadgets kippt jeweils nach ei¬ 
nem Mausklick um. Je nach 
Status erscheint es selektiert 
oder nicht selektiert. Der An¬ 
fangszustand ist »nicht selek¬ 
tiert«, was man allerdings mit 
dem oben beschriebenen Gad- 
get-Flag SELECTED ändern 
kann. 


»ENDGADGET« schließt bei 
der Anwahl eines Requester- 
Gadgets den Requester. Die fol¬ 
genden drei Flags sind für die 
Gadget-Abfrage von Bedeu¬ 
tung. 

»GADGIMMEDIATE« teilt 
dem Programm unverzüglich 
mit, wenn der Anwender das 
Gadget anwählt. Der Highlight- 
Zustand des Gadgets ist nur 
ganz kurz zu sehen. 

Anders bei dem Flag »REL- 
VERIP/«. Solange sich der 
Pointer, bei gedrückter Mausta¬ 
ste, über dem Gadget befindet, 
stellt sich dieses als angewählt 
dar. Und nur wenn er sich beim 
Loslassen der Maustaste noch 
über dem Gadget befand, gilt 
es als selektiert. 

»FOLLOWMOUSE« setzt 
man, wenn man Informationen 
über die Mausbewegungen 
während der Gadget-Anwahl 
empfangen möchte. Sinnvoll ist 
dieses Flag zum Beispiel, wenn 
man die Werte eines Proportio- 
nal-Gadgets (Schieberegler), 
noch während der Anwender es 
bedient, auswerten möchte. 

Während zur Auswertung mit 
Hilfe der Flags GADGIMME¬ 
DIATE und RELVERIFY über 
den Message-Port die IDCMP- 
Flags GADGETDOWN und 
GADGETUP abgefragt wer¬ 
den, warten wir bei FOLLOW- 
MOUSE-Gadgets auf MOUSE- 
MOVE. Setzen Sie also ent¬ 
sprechend Ihrer Kontrollfunk- 
tion die richtigen IDCMP-Flags. 
Ein Beispiel für FOLLOW- 
MOUSE-Gadgets finden Sie in 
Listing 29. 

Gruppe 2 ordnet unser Gad¬ 
get einem Fensterrand zu. Die 
Flags RIGHTBORDER, LEFT- 
BORDER, TOPBORDER und 
BOTTOMBORDER finden be¬ 
sonders bei Proportional- 
Gadgets eine Anwendung. Ist 
eines der Flags gesetzt, »re- 
fresht« Intuition den Gadget- 
Rahmen oder das Image zu¬ 
sammen mit dem Window- 
Rahmen. 

Gruppe 3 der Activation-Flags 
bezieht sich ausschließlich auf 
String-Gadgets. Normalerwei¬ 
se erscheint der Text in einem 
String-Gadget am rechten 
Rand des Eingabekästchens. 
Setzen Sie aber das Flag 
STRINGRIGHT, dann beginnt 
der Text am rechten Rand, und 
mit STRINGCENTER erscheint 
er stets in der Mitte des Feldes. 

Möchten Sie Integerzahlen 
einiesen, setzen Sie einfach 
das Flag LONGINT. Bei der Ein¬ 
gabe sind dann nur noch Zif¬ 
ferntasten erlaubt. Alle anderen 
Tasten verursachen einen Bild¬ 
schirmblitz. 

Das letzte Activation-Flag, 
ALTKEYMAP, teilt Intuition mit, 
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daß Sie einen zweiten Zeichen¬ 
satz verwenden möchten. Ein 
Pointer in der Stringlnfo-Struk- 
tur (siehe unten) verweist auf 
diesen Zeichensatz. 

In der Gadget-Struktur geht 
es weiter mit GadgetType. Mit 
Hilfe dieser Flags legen wir den 
Gadget-Typ fest. Wir unter¬ 
scheiden: 

BOOLGADGET - das Ja/Nein- 
Gadget, 

STRGADGET - dient zur Ein¬ 
gabe von Zahlen oder Zeichen¬ 
ketten und 

PROPGADGET - die ein- oder 
zweidimensionalen Schiebe¬ 
regler. 

Zwei weitere Flags bestim¬ 
men das Ausgabeelement des 
Gadgets. Setzen Sie das GZZ- 
GADGET-Flag, wenn Sie ein 
Gimmezerozero-Window ver¬ 
wenden. Möchten Sie ein Gad- 
get in einem Requester plazie¬ 
ren, so teilen Sie dies Intuition 
über das REQGADGET-Flag 
mit. 

Die beiden nächsten Kompo¬ 
nenten sind die Pointer Gadget- 
Render und SelectRender. Hier 
kann ein Zeiger auf eine Bor- 
der-Struktur oder auf eine 
Image-Struktur stehen. 

GadgetRender ist zu sehen, 
wenn das Gadget nicht ange¬ 
wählt ist. Nach einem Maus¬ 
klick über dem Gadget wird Se¬ 
lectRender sichtbar. Verwendet 
man GadgetRender, so muß 
GADGIMAGE unter »Flags« ge¬ 
setzt sein. Setzen Sie GADGHI- 
MAGE, so beachtet Intuition 
den Pointer unter SelectRen¬ 
der. 

Bei der Verwendung von Pro- 
portional-Gadgets müssen Sie, 
auch wenn Sie kein eigenes 
Image definiert haben, Gadget¬ 
Render mit einem Image-Struk¬ 
turpointer belegen. Intuition 
legt dort die Daten für den vom 
System zur Verfügung gestell¬ 
ten »Schiebeknopf« ab. 

Beachten Sie bitte, daß sich 
Ihre selbstgeschaffenen Rah¬ 
men oder Images nicht selb¬ 
ständig einem größenveränder¬ 
lichen GREL-Gadget anpas¬ 
sen. Es folgt in der Gadget- 
Struktur der Pointer Gadget- 
Text. Es handelt sich hierbei um 
die Adresse einer IntuiText- 
Struktur, wir haben sie bereits 
besprochen. Tragen Sie hier 
bitte NULL ein, wenn Sie Ihr 
Gadget nicht beschriften möch¬ 
ten. 

In MutualExclude, dem näch¬ 
sten Strukturelement, kann be¬ 
schrieben werden, wie einzelne 
Gadgets Zusammenarbeiten. 
Intuition ignoriert es jedoch in 
der vorliegenden Betriebssy¬ 
stemversion. 

Der Pointer Speciallnfo ver¬ 
langt die Adresse einer Prop- 


Info-Struktur, wenn Sie mit Pro- 
portional-Gadgets arbeiten, die 
Adresse einer Stringlnfo-Struk- 
tur bei String-Gadgets oder 
aber NULL bei Boolean-Gad- 
gets. 

Wie wir später noch sehen 
werden, liefert der IDCMP zwar 
Informationen über die Anwahl 
eines Gadgets, nicht aber dar¬ 
über, um welches es sich dabei 
handelt. Zur Unterscheidung 
beim Arbeiten mit mehreren 
Gadgets vereinbart man in der 
Gadget-Struktur eine ganzzah¬ 
lige positive Identitätsnummer: 
die »GadgetID«. Unsere Tool.h- 
Funktion GetMessageO ermit¬ 
telt die ID auf Wunsch automa¬ 
tisch. 

Intuition ignoriert diese Varia¬ 
ble, denn dieses und auch das 
letzte Element der Gadget- 
Struktur namens UserData ist 
nur für den Programmierer ge¬ 
dacht. UserData ist ein Zeiger 
auf eigene Daten, die im Zu¬ 
sammenhang mit dem Gadget 
stehen. 

ID zur 

Entscheidung 

Bild 4 zeigt schematisch die 
statische Initialisierung einer 
Anzahl Gadgets. Da das jeweils 
folgende Gadget (NextGadget) 
bei der Initialisierung bekannt 
sein muß, baut sich die Liste 
von unten nach oben auf. 

In der NewWindow-Struktur 
tragen wir die Adresse der er¬ 
sten Gadget-Struktur ein. 

Nach einem erfolgreichen 
Aufruf der Funktion OpenWin- 
dowO befinden sich dann alle 
Gadgets auf den vereinbarten 
Positionen. 

Falls Teile eines Gadgets 
überschrieben oder überzeich¬ 
net wurden, zeichnet Refresh- 
Gadgets(&gad,&win,&req) alle 
Gadgets einer Liste - ab dem 
als ersten Parameter genann¬ 
ten - neu. Die beiden anderen 
Parameter zeigen, wie bei den 
meisten anderen Gadget-Funk- 
tionen, auf die Strukturen des 
Ausgabewindows und, falls er¬ 
wünscht, des Ausgabe-Reque- 
sters. 

Eine ähnliche, jedoch erwei¬ 
terte Funktion ist Refresh- 
GList(&gad,&win,&req,n). Sie 
erlaubt ein »Refreshen« von n 
Gadgets, ab dem als ersten Pa¬ 
rameter genannten. Bei der An¬ 
gabe von n=-1, zeichnet Intui¬ 
tion die ganze Gadget-Liste 
neu. 

Da wir für jedes Gadget eine 
eigene Struktur anlegen und 
diese auch mit Werten versor¬ 
gen müssen, bläht sich der 
Quellcode unserer Programme 
bei der Verwendung mehrerer 


Gadgets gewaltig auf. Dies 
trägt natürlich nicht gerade zu 
deren Übersichtlichkeit und 
Nachvollziehbarkeit bei. Eine 
Vereinfachung muß her - eine 
Aufgabe für Tool.h. 

Die Gadget-Funktion Get- 
GadgetQ (siehe Listing 1) akti¬ 
viert auf einem bereits beste¬ 
henden Window ein beliebiges 
Gadget. Der Aufruf verlangt vie¬ 
le Parameter: GetGadget(&g, 
&w,l,t,w,h,f,a,ty,gr,sr,&tx,&si,id). 
Da Sie ja nun die Gadget-Struk¬ 
tur kennen, bereitet diese Liste 
für Sie keine Probleme. Die Pa¬ 
rameter sind: 

»&g« ist der Zeiger auf eine 
Gadget-Struktur. Tool.h initiali¬ 
siert diese, so daß Sie sie beim 
Aufruf anderer Gadget-Funk- 
tionen einsetzen können. 

»&w« ist die Adresse des Fen¬ 
sters, auf dem das Gadget er¬ 
scheinen soll; 

»l/t/w/h« beschreiben Position 
und Dimension des Gadgets; 
»f« sind die Flags: in »a« werden 
die Activation-Flags überge¬ 
ben; 

»ty« ist der Gadgettyp; 

»gr« steht für GadgetRender; 
»sr« bedeutet SelectRender; 
»&tx« ist die Adresse der 
IntuiText-Struktur; 

»&si« ist ein Zeiger auf Special¬ 
lnfo und »id« ist die Nummer 
des Gadgets. 

GetGadgetO kehrt mit der 
Nummer der Position, an der 
das Gadget in die Gadget-Liste 
eingefügt wurde, zurück. 

Nachdem in dieser Funktion 
die einzelnen Parameter den 
richtigen Strukturkomponenten 
zugewiesen sind, rufen wir die 
Funktion AddGadget(&win, 
&gad,&req,nr) auf. Abgesehen 
von »nr« kennen Sie die Para¬ 
meter bereits, es sind die glei¬ 
chen wie zum Beispiel bei Re- 
freshGadgetsQ- Freundlicher¬ 
weise sind jedoch die beiden 
ersten Parameter gegenüber 
den meisten anderen Gadget- 
Funktionen vertauscht, was ge¬ 
legentlich zu Schreibfehlern 
führen kann. 

»AddGadgetO« fügt einer be¬ 
stehenden Gadget-Liste ein 
neues Gadget, an der Position 
»nr«, ein. Möchte man das Gad¬ 
get der Liste anhängen, so gibt 
man für n den Wert -1 an. Diese 
Möglichkeit nutzen wir in 
Tool.h. 

Ja oder nein: 
Bool-Gadgets 

Der Returnwert der Funktion 
entspricht der tatsächlichen Po¬ 
sition des Gadgets in der Liste. 
Wir reichen diesen Wert nach 
dem Aufruf von RefreshGad- 
getO weiter. Ein Aufruf wie 
nr=GetGadget(...); 


aktiviert ein Gadget und liefert 
dessen Nummer in der Gadget- 
Liste. Denken Sie aber daran, 
daß die System-Gadgets vor 
den userdefinierten gelagert 
sind. Der Returnwert ist ent¬ 
sprechend höher. 

Die Boolean-Gadgets sind 
wohl die einfachsten aber auch 
die am meisten eingesetzten 
tntuition-Gadgets. Sie sind im¬ 
mer dann gefragt, wenn ein 
Programm nach einer Ja/Nein 
-Entscheidung verlangt oder 
die Auswahl von verschiedenen 
Möglichkeiten bietet. 

Man findet sie in jedem eini¬ 
germaßen komfortablen Pro¬ 
gramm. So wählt man bei¬ 
spielsweise in Textprogrammen 
über Bool-Gadgets den Zeilen¬ 
abstand oder die Schriftart, in 
Grafikprogrammen stellt man 
bequem Pinselbreite und Zei¬ 
chenmodus ein. Die Program¬ 
mierung selbst ist einfach, 
schauen wir uns Listing 31 an. 
SetStyle aktiviert sieben Bool- 
Gadgets am rechten Rand des 
CLI-Fensters. Dieser Bereich ist 
sehr gut geeignet, da er wegen 
der SIZEBRIGHT-Einstellung 
(siehe unter Windows) nicht 
hochscrollt, wenn der Cursor 
die unterste CLI-Zeile erreicht. 

Jedes der Gadgets schaltet, 
wenn selektiert, einen anderen 
SoftStyle-Zeichensatz ein. Die 
sieben Gadget-Strukturen ver¬ 
einbaren wir in Listing 31 gleich 
zu Beginn der Hauptfunktion 
mainO- 

Nach dem öffnen der Libra¬ 
ries verändert der Aufruf der 
Funktion ModifylDCMPO die 
IDCMP-Flags des gerade akti¬ 
ven CLI-Fensters. Wie Sie wis¬ 
sen, sendet uns Intuition über 
den Messageport nur solche 
Nachrichten, die wir durch 
Kombination der IDCMP-Flags 
anfordern. 

Für die Gadget-Kontrolle be¬ 
trachten wir zunächst zwei 
Flags: GADGETDOWN und 
GADGETUP. Zu MOUSEMO- 
VE im Zusammenhang mit 
Gadgets erfahren Sie später 
mehr. 

Intuition sendet uns entspre¬ 
chend der gesetzten IDCMP- 
Flags eine Nachricht, wenn der 
Anwender die linke Maustaste 
über dem Gadget drückt 
(DOWN) oder losläßt (UP). 
Möchte man in jedem Fall eine 
Nachricht, so kann man die 
Flags auch kombinieren, also 
mit ODER verknüpfen: 

GADGETDOWNIGADGETUP 

Der nächste Schritt in Set- 
Style.c ist der Aufruf der neuen 
Gadget-Funktion. Er erfolgt in 
einer Schleife siebenmal. Die 
Y-Position des Gadgets und die 
Gadget-Kennummer sind ab- 
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/• 

W Setstyle - BOOLGADGET-Denio 
•/ 

#include TOOL.h' 

#deflne ANZ_G 7 
#define HOEHE 238/ANZ_G 
#<lefine BREITE 15 

SHORT pos[]=t 0,0, BREITE,0, BREITE,HOEHE, 0,HOEHE, 0, 

0 ]; /* Koordinaten */ 

struct Border border=( -1,-1, 1,0, JAHl, 5,&pos[0], MULL jj 
/* Border »/ 

VOID mainO 
{ 

struct Window »win; 
struct Gadget gad[ANZ_G]; 

ULONG dass; 

USHORT Idj 

SHORT l,style,ende=0; 
if(OpenLlb()}l 

prlntf('Kann Llb's nicht öffnenlNn'); 
exlt(O); 

1 

ModifyIDCKP(win=ACTIVE_MINDOW,GADGETUP); /* IDCMP-Flags 

ändern */ 

for(l=0;i<ANZ_G;l++)( 

GetGadget{&gad[l],wln, 640-BREITE,10+1«HOEHE,BREITE,HOEHE, 
GAXHCOMP, 

RELVERIFYl GADGIHMEDIATE, BOOLGADGET,&border, 

NULL,NULL,NULL,!); 

! 

prlntf( "\nENDE\nNortnal\nFett\nSch«arz\nSchräg\nUnterstrichen\ 

nReversNn') j 

while(ende=*0)[ 

Walt (1< < Win->UserPort->nip_SigBit) j 
lf((class=CetMessage(wln,0,ild,0))**GADGETUP)[ 

lf((style»(ld<6} ? id-1 : ld+1) < 0) ende++i 
eise printf('\033C*'i®A3 8b Cc\n”,style)} 

) 

} 

for(i=Oji<ANZ_G;l++) RemoveGadget(win,&gad[i]){ /* Gadgets 
streichen */ 

HodlfyIDCHP(win,0){ /* IDCMP-Flag 

für CLI-Fenster »/ 

RefreshWindowFrame(wln)i /• Uindowrahmen neuzeichnen und Gadgets 
löschen »/ 

CloseLibOj 

1 

Listing 31. Umschalten der SoftStyle-Zeichensätze mit 
Boolean-Gadgets 


hängig vom Schleifenzähler. 
Als Flag wählen wir GADGH- 
COMP, das bedeutet Komple¬ 
mentär-Darstellung bei der An¬ 
wahl. Die Activation-Flags REL- 
VERIFY und GADGIMMEDIA- 
TE sorgen für die direkte Be¬ 
nachrichtigung des Pro¬ 
gramms. Außerdem soll das 
Gadget nur als angewählt gel¬ 
ten, wenn sich der Mauszeiger 
beim Loslassen der Maustaste 
noch über dem Gadget befand. 

Ein Zeiger auf die statisch in¬ 
itialisierte Borderstruktur sorgt 
für eine Umrahmung der einzel¬ 
nen Gadgets. Die Positionsan¬ 
gaben innerhalb dieser Struk¬ 
tur beziehen sich auf das Gad¬ 
get. Der Parameter Specialinfo 
ist bei Bool-Gadgets immer 
NULL. Der letzte Parameter, die 
Identitätsnummer, ist identisch 
mit dem Schleifenzähler. 

Mit der folgenden printfO- 
Funktion geben wir die Bedeu¬ 


tung der einzelnen Gadgets auf 
dem Bildschirm aus. Die Initiali¬ 
sierung von sieben IntuiText- 
Strukturen hätte den Rahmen 
eines Bool-Gadget-Demos ge¬ 
sprengt. 

Aber vielleicht versuchen Sie 
selbst einmal jedes Gadget mit 
einem Buchstaben zu kenn¬ 
zeichnen, um so auf dessen 
Funktion hinzuweisen? 

Eine while-Schleife schließt 
sich an. Mit der ersten Zeile des 
Schleifenrumpfes wartet das 
Programm, bis eine Intuition- 
Nachricht anliegt. SetStyle be¬ 
lastet das System also kaum, so 
daß Sie es auch mit »RUN Set¬ 
Style« starten und weiter im CLI 
arbeiten können. 

Die Tool.h-Funktion GetMes- 
sageO empfängt die Nachricht. 
Ist diese gleich GADGETUP, so 
lesen wir die Kennummer des 
gewählten Gadgets und wan¬ 
deln sie in die möglichen 


SoftStyle-Werte um - dies sind 
die Werte 0 bis 4 und 7. 

Wie erhalten wir die Gad- 
get-ID? Wir haben es schon 
einmal bei der Besprechung 
der Tool.h-Funktion GetMessa- 
ge() angedeutet. Gibt man die¬ 
ser als dritten Parameter die 
Adresse einer USHORT-Varia- 
blen mit, belegt die Funktion 
die entsprechende Variable mit 
dem Wert der Gadget-ID des 
gewählten Gadgets. 

USHORT id; 

class=GetMessage(win,0, 

&id,0); 

Eine Komponente innerhalb 
der von GetMessageO empfan¬ 
genen IntuiMessage-Struktur 
verweist auf das Objekt, das die 
Nachricht betrifft: lAddress. In 
unserem Fall zeigt lAddress auf 
die Struktur des gewählten 
Gadgets, wo wir auch die benö¬ 
tigte Nummer finden. Als näch¬ 
stes geben wir ein paar Zeichen 
des neu eingeschalteten Soft¬ 
zeichensatzes aus. Die Um¬ 
schaltung erfolgt mit einer 
»Console Control Sequence«, 
zum Beispiel 

printf(\ 033[0m"); 

für Normalschrift. Das oberste 
Gadget hat die ID 0. Wird es 
selektiert, erhält die Variable 
»style« in unserem Programm 
den Wert-1. Die Bedingung der 
while-Schleife ist nicht mehr er¬ 
füllt, es folgt das Programm¬ 
ende. 

Komfortabel: 

String-Gadgets 

Zuvor streicht jedoch Remo- 
veGadget(&win,&gad} die Gad¬ 
gets aus der Liste. Die Parame¬ 
ter sind Pointer auf Window- 
und Gadget-Struktur. Vorsicht, 
RemoveGadgetO löscht die 
Gadgets aus der Liste, aber 
nicht vom Bildschirm, ln Set- 
Styie.c erreichen wir dies ein¬ 
fach mit RefreshWindow- 
FrameQ. 

Nachdem die IDCMP-Flags 
wieder auf null gesetzt sind, 
schließen wir mit der Tool.h- 
Funktion CloseLibQ die benö¬ 
tigten Libraries. 

Intuition bietet zwei Arten von 
String-Gadgets an: Text- und 
Inter-Gadgets. Sie ermöglichen 
die Eingabe von Zeichenketten 
beziehungsweise ganzen Zah¬ 
len über die Tastatur. 

Die Eingabe von Float-Zah- 
len ist nicht direkt implemen¬ 
tiert. Es ist aber denkbar, diese 
mittels Textgadget als Zeichen¬ 
kette einzulesen, um sie dann 
zum Beispiel über die system¬ 
unabhängige Funktion atofO 
umzuwandeln. String-Gadgets 


werden in allen möglichen Ar¬ 
ten von Programmen einge¬ 
setzt, zum Beispiel zur Eingabe 
von Filenamen oder Einstellpa¬ 
rametern. Das Textgadget der 
Rename-Routine der Work- 
bench hat sicher jeder schon 
einmal bedient. 

Die Eingabe ist komfortabel, 
dem Bediener stehen einige 
Editiertasten zur Verfügung: 
Die Cursortasten links und 
rechts bewegen den Cursor in 
die entsprechende Richtung. 
Kombiniert man diese Tasten 
mit Shift, springt der Cursor an 
den Anfang oder an das Ende 
des Eingabestrings. Die DEL- 
Taste löscht das Zeichen unter, 
die BACKSPACE-Taste das Zei¬ 
chen links vom Cursor. Die 
RETURN-Taste schließt die 
Eingabe ab. Wenn das RELVE- 
RIFY-Flag gesetzt ist, sendet 
Intuition eine Nachricht. 

Die Kombination < rechte 
Amiga-Taste x> löscht die ge¬ 
samte Eingabe, < rechte 
Amiga-Taste q> ist die zugehö¬ 
rige »Undo«-Funktion. 

Im Grunde unterscheidet 
sich die Programmierung eines 
String-Gadgets nur in wenigen 
Punkten von der eines Boo- 
lean-Gadgets. Dies ist ein gro¬ 
ßer Vorteil für uns, denn wir kön¬ 
nen wieder unser Tool.h einset- 
zen und so Platz und Arbeit 
sparen. 

Ein wichtiges Unterschei¬ 
dungsmerkmal ist natürlich die 
Angabe von STRGADGET als 
Gadget-Type. Weiter belegen 
wir hier erstmals die Kompo¬ 
nente Speciallnfo der Gadget- 
Struktur. Dort erwartet jetzt In¬ 
tuition die Adresse einer 
Stringlnfo-Struktur (Listing 32). 

Diese Struktur ist schnell er¬ 
klärt, denn die meisten Varia¬ 
blen initialisiert Intuition selbst. 

»Buffer« ist ein Zeiger auf ei¬ 
nen Puffer, der groß genug sein 
muß, den mit Null abgeschlos- 


stnjct Stringinfo 

l 

UBYTE «Buffer; 

UBYTE »UndoBuffer; 

SHORT BufferPos; 

SHORT MaxCharsj 
SHORT DispPos; 

SHORT UndoPos; 

SHORT NumChare; 

SHORT DlspCount; 

SHORT CLeft, CTop; 
struct Layer »LayerPtr; 

LONG Longint; 

struct KeyMap «AltKeyMap; 

1 : 

Listing 32. Für die Verwen¬ 
dung eines String-Gadgets 
fordert Intuition die Initia¬ 
lisierung einer Stringlnfo- 
Struktur 
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senen Eingabestring aufzuneh¬ 
men. »UndoBuffer« ist der Puf¬ 
fer für die Undo-Funktion. Er 
muß mindestens die Größe von 
»Buffer« haben. Findet Intuition 
hier eine 0, so funktioniert die 
Undo-Funktion nicht. 

Hat man mehrere String- 
Gadgets definiert, kommt man 
oft dennoch mit einem einzigen 
Undo-Puffer aus. Geben Sie in 
Stringinfo einfach immer die 
gleiche Adresse unter Undo- 
Puffer an. 

»BuffPos« ist die Cursorposi¬ 
tion im Eingabefeld. 

»MaxChars« gibt die maxi¬ 
male Anzahl der Eingabezei¬ 
chen plus eins, wegen der ab¬ 
schließenden Null. an. 

»DispPos« gibt an, welches 
Zeichen im Puffer an erster 
Stelle im Eingabefeld darge¬ 
stellt werden soll. 

Die folgenden sieben Ele¬ 
mente verwaltet Intuition selbst, 
wir geben bei der Initialisierung 
einfach eine 0 an. 

»UndoPos« beschreibt die 
Cursorposition im Undo-Puffer. 

»NumChars« ist die Anzahl 
der Zeichen im Puffer. 

»CLeft« und »CTop« ist die Po¬ 
sition der linken oberen Ecke 
des Eingabefeldes im Gadget. 

»LayerPtr« zeigt auf die zuge¬ 
hörige Layer-Struktur. 

»Longint« enthält den Einga¬ 
bewert eines Integer-Gadgets. 

Den Inhalt des Zeigers »Alt- 
KeyMap« geben wir wieder 
selbst an. Es ist ein Zeiger auf 
eine eigene Tastaturtabelle, in 
diesem Fall muß das Activation- 
flag ALTKEYMAP gesetzt sein. 

Genug erzählt! Schauen wir 
uns die Programmierung lieber 
an einem praktischen Beispiel 
an. Das erklärt mehr als 1000 
Worte: 

Listing 32 öffnet ein Fenster 
mit einem Text- und einem 
Integer-Gadget. Nach dem 
Start gibt das Programm jede 
mit < RETURN > abgeschlos¬ 
sene Gadget-Eingabe im CLI- 
Fenster aus. Die Gadgets akti¬ 
vieren sich dabei wechselsei¬ 
tig, das Text-Gadget ist sofort 
nach dem Programmstart aktiv. 
Ohne diese Selbstaktivierung 
müßte der Programmbediener 
jedes Gadget vor der Eingabe 
mit der Maus anwählen. Zu Be¬ 
ginn des Listings 32 werden 
notwendige Strukturen wie die 
Border-, die Stringinfo- und die 
IntuiText-Struktur initialisiert. 

Innerhalb von mainO verein¬ 
baren wir gleich zwei Gadget- 
Strukturen. Die erste für das 
Text-Gadget, die andere für das 
Integer-Gadget. Nach dem Öff¬ 
nen der Libraries und des Win¬ 
dows startet ein Aufruf der neu¬ 
en Tool.h-Funktion GetGadgetO 
die beiden Gadgets. 


Das Textgadget ist mit einem 
IntuiText versehen. Beide Gad¬ 
gets nutzen die gleiche Border- 
struktur und auch - vergleichen 
Sie bitte die beiden Stringinfo- 
Strukturen - den gleichen 
Undo-Puffer. 

Als Activation-Flags sind bei 
beiden Gadgets RELVERIFY 
und GADGIMMEDIATE ge¬ 
setzt. Das Integer-Gadget be¬ 
nötigt noch zusätzlich LONG¬ 
INT. Die Gadget-Flags sind un¬ 
terschiedlich. Während beim 
Textgadget GADGHCOMP für 
eine komplementäre Darstel¬ 
lung sorgt, stellt GADGHBOX 
innerhalb des Integer-Gadgets 
den Cursor als Rahmen oder 
Box dar. 

Die Funktion ActivateGad- 
get(&gad,&win,&req) aktiviert 
das erste Gadget. Die Parame¬ 
ter entsprechen denen der Ih¬ 
nen schon bekannten Gadget- 
Funktionen. In der folgenden 
while-Schleife analysieren wir 
die von Intuition gelieferten 
Nachrichten. Im Falle CLOSE- 
WINDOW erfolgt das Pro¬ 
grammende. Empfangen wir 
GADGETUP, so entscheiden 
die GadgetlDs, welcher case- 
Zweig ausgeführt wird. 

Im ersten Fall gibt eine 
printfO-Funktion die Zeichen¬ 
kette aus: 

printf("String: ^s\n" , 
SInfol.Buffer ); 

Hat der Bediener das Inte¬ 
ger-Gadget benutzt, geben wir 
die ins Gadget eingetragene 
Zahl aus; 

printf("Zahl: ^ld\n", 
SInfo2.Longint ); 

In jedem Fall aktiviert Activa- 
teGadgetQ das jeweils andere 
Gadget. Auf die Einrichtung ei¬ 
nes default-Zweigs innerhalb 
der beiden switch-Anweisun- 
gen haben wir bewußt verzich¬ 
tet. 

Elegant: 

Proportional- 

Gadgets 

Mit Hilfe dieser leistungsfähi¬ 
gen Intuition-Eingabeelemente 
in Form eines Schiebereglers 
kann man während des Pro¬ 
grammablaufs Werte zwischen 
zwei Grenzen beliebig verän¬ 
dern. 

Man »ergreift« mit der Maus 
den Schiebeknopf und bewegt 
ihn in eine andere Position. Da¬ 
bei ändert sich ein bestimmter 
Wert kontinuierlich wie bei ei¬ 
nem Potentiometer. 

Proportional-Gadgets findet 
man in allen Arten von Pro¬ 
grammen, zur Einstellung von 
Geschwindigkeiten, Positionen 
oder der Bildschirmfarben. Die 


in den Workbench-WIndows in¬ 
stallierten Rollbalken sind 
nichts anderes als Proportional- 
Gadgets. 

Zur Verwaltung eines Propor¬ 
tional-Gadgets ist, wie Sie rich¬ 
tig befürchten, eine weitere 
Struktur nötig: die «Proplnfo«- 
Struktur. Weiter oben haben wir 
bereits angedeutet, daß Intui¬ 
tion deren Adresse in der Gad- 
get-Struktur unter Speciallnfo 
erwartet. 


Interessant in dieser Struktur 
sind eigentlich nur die ersten 
fünf Variablen, alle anderen 
setzt Intuition selbst: 

Flags bestimmen unter an¬ 
derem über das Aussehen des 
Gadgets. Es existieren fünf 
Flags, eines davon, »KNOB- 
HIT«, setzt Intuition, wenn der 
Anwender den Schiebeknopf 
anklickt. Das Flag bleibt so lan¬ 
ge gesetzt, bis Intuition einen 
Mausklick außerhalb des Knop- 


/* 

\\ Prop.e - demonstriert Proportional-Gadgets 
»/ 

#lnclude 'TOOL.h' 

#deflne GS (OxFFFF/32) /» Gadget mit 32 ' 

Schieberstellungen' »/ 

#define VP &ACTIVE_SCREEN->ViewPort /» Zeiger 

auf ViewPort »/ 

struct Window *winj 
atmet Image image; 
stmet Proplnfo PInfo={ 

FREEHORIZlAUTOKHOB, GS»16,0, GS,0, 0,0,0,0,0,0 

); 

VOID error(Meldung) 

STRPTR Meldung; 

( 

if(Meldung} printf{'Kann *8 nicht öffnenl?!\n',Meldung); 
if(win) Cl 08 eWindow(win}; 

CloseLibO; 

exit(O); 

] 

VOID mainO 
{ 

atmet Gadget gad; 

ULONG cla8a*0,idcrap=HOUSEMOVEl CLOSEWINDOW, 

flagSsUINDOtfCLOSEl WINDOWDEPTHl WINDOWDRAGl WINDOWSIZING 
lACTIVATE; 

SHORT i, ok»0, r[43,g[4],b[4], wert, rot,gmen,blau; 
lf(0penLlb()} error('Llb’s'); 

lf( I (win=GetWindow(NULL,0,0,160,60,ldcnip,flags, "Re-Darker*, 
MULL))) 

error('Window'); 

win->MinWidth*wln->MinHeight=60; 
GetGadget(&gad,win,10,20,-20,-35,GRELWIDTHl GRELHEIGHT, 
FOLLOWMOÜSE, 

PROPGADGET, Stimage, NULL, NULL, & 
Plnfo,0); 

for(i.0;i<4;i-H-) GetCol(VP,i,&r[l],&g[i],&b[i]); 
while(classI°CLOS£WINDOW]{ 

Wait{ 1< < win-> UserPort- >mp_SigBit) j 
cla8S=GetMeasage(win,0,0,0); 

if(ola8Ss=M0USEH0VE){ /* Das Gadget wurde 

angewählt */ 

wert=PInfo.HorizPot/GS-16; /» neuer 

Wert eingestellt */ 

for(l=0;i<4;i++)( /* die 4 Farbregister des 

WB-Screens »/ 

rot =(((r[l]-uert)<0)?0:r[i]-wert); 
lf{rot>15) rot=15; 
gmen=(((g[l]-wert) < 0 )? 0 :g[l]-wert); 
lf(gmen>15) gmen=15; 
blau =({(b[i]-wert) < 0 )? 0 :b[ 13 -wert); 
if(blau>15) blau=15j i 

SetRGB4(VP,l,rot,gmen,blau); /» neue 

Farben setzen */ 

] 

while((class=GetMe8sage(wln,0,0,0))==MOUSEHOVE); 

i 

) 

error(O); 

] 


Listing 33. Re-Darker: ein Proportional-Gadget als 
Helligkeitsregler 
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C-Kurs 


fes registriert. Um die Umrah¬ 
mung eines Proportional- 
Gadgets brauchen Sie sich 
nicht zu kümmern, Intuition 
zeichnet automatisch einen 
passenden Rand. Dies können 
Sie alierdings, wenn nö¬ 
tig, mit dem »PROPBORDER- 
LESS«-Fiag verbieten. Intuition 
nimmt Ihnen auch die Definition 
des Schiebeknopfes ab. Falls 
Sie das wünschen, setzen Sie 
»AUTOKNOB« und tragen Sie 
unter GadgetRender in der 
Gadget-Struktur einen Zeiger 
auf eine Image-Struktur ein. 
Die Größe des Intuition- 
Knopfes ist von den Maßen des 
Containers, das ist der Bereich 
innerhalb des Rahmens, und 
der Anzahl der möglichen Wer¬ 
te, also der Schrittweite, abhän¬ 
gig. Wollen Sie einen eigenen 
GadgetKnopf definieren, legen 
Sie in GadgetRender die Adres¬ 
se der von Ihnen initialisierten 
Image-Struktur ab. 

»Props» unter 
der Lupe 

Die beiden restlichen Flags 
bestimmen über die Bewe¬ 
gungsrichtung des Gadgets. 
Man kann den Knopf in der Ho¬ 
rizontalen bewegen, wenn 
»FREEHORIZ« gesetzt ist. 
»FREEVERT« erlaubt die Bewe¬ 
gung in vertikaler Richtung. 
Kombinieren Sie die beiden 
Flags, so ist der Knopf in beide 
Richtungen beweglich. Ein sol¬ 
ches zweidimensionales Pro- 
portional-Gadget finden Sie in 
Listing 42, Sie können damit die 
Position des Bildes auf dem 
Monitor beliebig einsteilen. 

HorizPot ist die horizontale 
Position des Knopfes beim Er¬ 
scheinen des Gadgets auf dem 
Bildschirm in Prozent, bezogen 
aufMAXPCfr(= OxFFFF^. Wei¬ 
ter unten legen wir in HorizBody 
die Schrittweite und damit die 
Anzahl der Schieberstellungen 
fest. Der Wert HorizPot ist nun 
einfach die gewünschte Start- 
Schieberstellung, multipliziert 
mit dem unter HorizBody ge¬ 
speicherten Wert. 

Sie müssen HorizPot nur 
dann initialisieren, wenn das 
Proplnfo-Flag FREEHORIZ ge¬ 
setzt ist. 

VertPot beinhaltet bei Gad¬ 
gets mit gesetztem FREE- 
VERT-Flag die vertikale Posi¬ 
tion des Schiebers beim Er¬ 
scheinen des Gadgets auf dem 
Bildschirm. Hier erreichen Sie 
die Grundeinstellung, indem 
Sie einen Ausgangswert mit 
dem Inhalt der Variablen Vert- 
Body multiplizieren. 

In HorizBody und VertBody 
tragen Sie die Schrittweite ei¬ 


ner Schieberstellung ein. Sie 
errechnet sich, indem man ein¬ 
fach den durch die Konstante 
MAXBODY symbolisierten 
Wert OxFFFF durch die Anzahi 
der benötigten Schieberstellun¬ 
gen dividiert. 

Die restlichen Elemente der 
Proplnfo-Struktur werden zwar 
von Intuition gesetzt, wir wollen 
sie aber dennoch kurz bespre¬ 
chen: 

CWidth und CHeight sind 
die Breite und die Höhe des 
Containers. 

HPotRes und VPotRes be¬ 
schreiben das Inkrement des 
Knopfes pro Schieberstellung, 
es berechnet sich aus MAX- 
BODY/(Schieberstellungen-1). 

LeftBorder und TopBorder 
geben die Position der linken 
oberen Ecke des Gadgets an. 
Mit der Funktion ModifyProp 
(&gad,&win ,&req, Flags, Horiz- 

f^t,VertPot,HorizBody,Vert- 
Body) ist es möglich, die ersten 
fünf Variablen der Proplnfo- 
Struktur jederzeit zu verändern. 
ModifyPropO »refresht« das 
Gadget nach der Modifizierung 
selbständig. 

Die ersten drei Parameter 
sind im Zusammenhang mit 
Gadget-Funktionen bereits 
mehrfach erklärt worden, die 
restlichen fünf sind identisch 
mit den gerade besprochenen 
Komponenten der Proplnfo- 
Struktur. 

Die Abfrage der Proportional- 
Gadgets mit GADGETDOWN 
und GADGETUP funktioniert 
analog der Abfrage von 
Boolean- und String-Gadgets. 

Die unmittelbare Abfrage 
und die Auswertung der Gad¬ 
gets lernen wir bei der folgen¬ 
den Besprechung des Beispiel¬ 
programms Prop.c (Listing 33) 
kennen. 

Das übersetzte Programm 
öffnet ein Fenster mit einem 
Schieber zum Einsteilen der 
Bildschirmhelligkeit. Die Verän¬ 
derung der Helligkeit erreichen 
wir durch Inkrementierung oder 
Dekrementierung der vier Far¬ 
ben des Workbenchscreens. 

Nach der Einbindung des 
Headerfiles und der Festlegung 
einiger Konstanten vereinbaren 
wir unter anderem einen Zeiger 
auf eine Image-Struktur. Diese 
Struktur wird später die Werte 
des von Intuition gestellten 
Schiebeknopfes beinhalten. 

Die statische Initialisierung 
der Proplnfo-Struktur folgt. Sie 
verrät, daß in dem zugehörigen 
Gadget ein Intuitionknopf in 32 
Schritten waagerecht ver¬ 
schiebbar ist und daß sich die¬ 
ser Kopf zu Beginn an der 16. 
Position, also in der Mitte, befin¬ 
det. Die Vereinbarung der 
Gadget-Struktur finden Sie am 


Anfang der mainO-Funktion. Da 
wir dieses direkt, also noch 
während der Bedienung, abfra- 
gen möchten, setzen wir als 
IDCMP-Flag für das Window 
neben CLOSEWINDOW noch 
MOUSEMOVE. Intuition sen¬ 
det uns diese Nachricht, wenn 
der Anwender ein Gadget mit 
gesetztem FOLLOWMOU- 
SE-Activationflag angewählt 
hat. 

Nach dem Öffnen der Libra¬ 
ries und des Windows legen wir 
die Mindestausdehnung für 
das gerade geöffnete Fenster 
fest. Es folgt die Aktivierung 
des, wie Sie aus den gesetzten 
Flags ersehen, größenverän¬ 
derlichen Gadgets. 

Die Tool.h-Funktion GetColO. 
in der folgenden for-Schleife, 
liest die Farbwerte des aktiven 
Screens aus und splittet sie in 
ihre Rot-Grün-Blau-Werte. In ei¬ 
ner while-Schleife übenwachen 
wir den Messageport. Wir er¬ 
warten die Werte CLOSEWIN¬ 
DOW und MOUSEMOVE. Im 
Falle CLOSEWINDOW been¬ 
det die Funktion errorQ das Pro¬ 
gramm. 

Wählt der Anwender das 
Gadget an, so sendet Intuition 
MOUSEMOVE. Die Proplnfo- 
Variable HorizPot beinhaltet 
den momentan eingestellten 
Wert: 

wert=PInf 0 .HörizPot/GS j 

»GS« ist dabei die Konstante, 
die die Anzahl der Schieberstel¬ 
lungen festlegt, in unserem Bei- 


Sie sehen, mit Gadgets kann 
man richtige Menü-Felder auf¬ 
bauen. Eine andere, sehr kom¬ 
fortable Art der Darstellung 
mehrerer Auswahlmöglichkei¬ 
ten, ist das bekannte Intuition 
Pull-Down-Menü. Der Einsatz 
dieser Menüs ist für Anwender 
und Programmierer gleicher¬ 
maßen interessant. Für den ei¬ 
nen bedeuten sie höchsten Be¬ 
dienungskomfort, für den ande¬ 
ren eine Entlastung durch be¬ 
reits existierende Betriebssy- 
stemroutinen. Wir zeigen Ihnen 
auf den folgenden Seiten, wie 
man dieses Bedienungsele¬ 
ment in eigenen Programmen 
nutzt. 

Damit werden unsere Pro¬ 
gramme noch komfortabler und 
damit auch professioneller. Wer 
als Amiga-Programmierer sei- 


spiel bedeutet GS (OxFFFF/32). 
Im Beispielprogramm subtra¬ 
hieren wir noch 16, so daß der 
Wert der Variablenwert negativ, 
positiv oder null sein kann. 

Die Berechnung der neuen 
Werte der vier Workbenchfar- 
ben ist recht einfach: Wir müs¬ 
sen nur von den oben ermittel¬ 
ten Farbwerten unseren 
Gadget-Wert subtrahieren. 

Je nach Größe und Vorzei¬ 
chen der Variablen wert er¬ 
scheint der Bildschirm nach 
dem Aufruf der Funktion 
SetRGB4() heller oder dunkler. 

Sie sind es sicher schon ge¬ 
wohnt. am Ende eines jeden 
Kapitels eine Reihe von Pro¬ 
blemstellungen vorzufinden. 
Diesmal ist es nur ein einziges, 
allerdings deckt es den bespro¬ 
chenen Stoff voll ab und ist ent¬ 
sprechend umfangreich: 

- Öffnen Sie ein Window mit ei¬ 
nem Boolean-, einem Integer- 
und drei Proportional-Gadgets. 
In das Integer-Gadget soll der 
Anwender Ihres Programms ei¬ 
ne Farbregisternummer eintra¬ 
gen können. Der Inhalt dieses 
Registers, die Farbe also, er¬ 
scheint nach einem < RE¬ 
TURN > auf dem Boolean- 
Gadget. Diese Farbe soll über 
die drei Schieberegler einstell¬ 
bar sein. Der Farbwert wird 
aber erst in das entsprechende 
Register übernommen, wenn 
der Anwender seine Einstel¬ 
lung mit einem Klick über dem 
Boolean-Gadget bestätigt. 


ne Produkte anwenderfreund¬ 
lich gestalten möchte, kommt 
an Pulldown-Menüs einfach 
nicht vorbei. 

Der Einsatz eines Menüs bie¬ 
tet sich immer da an, wo der An¬ 
wender aus einer Anzahl ver¬ 
schiedener Programmpunkte 
einen auswählen und so über 
den weiteren Programmverlauf 
entscheiden kann. 

Natürlich könnte man ein Me¬ 
nü auch, wie im Beispiel Palet¬ 
te, aus Gadgets aufbauen oder 
einfach nur eine Ziffer über die 
Tastatur einiesen und entspre¬ 
chend im Programm verzwei¬ 
gen. Die genannten Möglich¬ 
keiten setzen allerdings ein ei¬ 
genes Menüfeld, auf dem alle 
Möglichkeiten dargestellt sind, 
voraus. Hier zeigt sich bereits 
der erste Vorteil der Intuition- 
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struct Menu 
[ 

struct Menu »NextMenu; 

SHORT LeftEdge, TopEdge, Width, Height; 
USHORT Flags; 

BYTE »MenuName; 

struct Menuitem »Flrstltem; 

SHORT JazzX, JazzY, BeatX, BeatYj 


Listing 34. Kurz und bündig: die Menu-Struktur 


struct Henultem 
{ 

struct Menuitem »Nextitem; 

SHORT LeftEdge, TopEdge, yidth, Height; 

USHORT Flags; 

LONG MutualExclude; 

APTR ItemFlllj 
APTR SelectFill; 

BYTE Coinraand; 

struct Menuitem »Subitem; 

USHORT NextSelect; 

1 ; 

Listing 35. Jeder Menüpunkt wird mit einer 
Menultem-Struktur festgelegt 


menütechnik: 

Pull-Down-Menüs sind platz¬ 
sparend in der Screen- 
Titelleiste untergebracht. Erst 
beim Betätigen der rechten 
Maustaste - des sogenannten 
»Menubuttons« - erscheinen 
dort die Titel der Hauptmenüs. 
Bewegt man den Mauszeiger 
mit gedrückter rechter Mausta¬ 
ste über einen solchen Menüti¬ 
tel, klappt das Menü nach un¬ 
ten. 

Jetzt sind die einzelnen Me¬ 
nüpunkte, Items genannt, sicht¬ 
bar, Man selektiert einen Pro¬ 
grammpunkt, indem man die 
rechte Maustaste einfach über 
dem gewünschten Item losläßt 
oder ihn mit der linken Mausta¬ 
ste anklickt. 

Jedes Item kann ein Unter¬ 
menü, bestehend aus den so¬ 
genannten »Subitems«, bein¬ 
halten. 

Anwahl 
über Tasten¬ 
kombination 

Items, wie auch Subitems, 
sind außer mit der Maus über 
Tastenkombinationen, beste¬ 
hend aus der rechten Amigata- 
ste und einer beliebigen Zei¬ 
chentaste, zu erreichen. 

Ein komplettes Menü nennt 
man MenuStrip. Ein solcher 
MenuStrip ist einem Window 
fest zugeordnet. Er kann aus 
mehreren Hauptmenüs-bei In¬ 
tuition spricht man von »Me¬ 
nus« - bestehen. 

Jedes Hauptmenü (Menu 
oder Menuheader), dargestellt 
durch einen Titel in der Screen- 
Tltelleiste, setzt sich aus einer 
Anzahl Items und Subitems zu¬ 
sammen. 

All diese Elemente verwaltet 
Intuition, wie aus Bild 5 hervor¬ 
geht, mit verketteten Struktu¬ 
ren. 

Man unterscheidet die für 
Hauptmenüs zuständige Me¬ 
nu-Struktur und die Menultem- 
Struktur, welche Items und 
Subitems beschreibt. 

Beginnen wir mit der Menu- 
Struktur (Listing 34). Viele Kom¬ 
ponenten darin kennen Sie be¬ 
reits von anderen Intuition- 
Strukturen, sie haben auch hier 
eine ähnliche Bedeutung. So 
ist NextMenu nichts anderes 
als ein Zeiger auf die Struktur 
des nächsten gleichartigen In¬ 
tuition-Elementes, in unserem 
Falle auf die des nächsten 
Hauptmenüs. LeftEdge und To¬ 
pEdge beinhalten die Position 
der linken oberen Ecke des Ti¬ 
tels. Die Variable TopEdge soll¬ 
ten sie zur Zeit immer auf 0 set¬ 
zen. Width und Height be¬ 
schreiben die Breite und Höhe 


des Menütitels. Für Height er¬ 
laubt die aktuelle Version von 
Intuition nur die Höhe der 
Screen-Titelleiste. 

Zur Zeit existieren nur zwei 
Flags für Menüs: MENUE- 
NABLED und MIDRAWN. Ein 
Hauptmenü ist anwählbar, 
wenn MENUENABLED gesetzt 
ist. Ansonsten stellt Intuition 
den Menütitel in Geisterschrift 
dar. Das komplette Menü ist 
dann nicht anwählbar. 

Den Zustand dieses Flags 
können Sie jederzeit mit den 
Funktionen OffMenu(&win,me- 
nunumber) und OnMenu(&win, 
menunumber) ändern. Als Pa¬ 
rameter dienen die Adresse des 
Windows und die Menünum¬ 
mer (siehe unten). Das Flag MI¬ 
DRAWN setzt Intuition selbst, 
wenn sich der Mauszeiger bei 
gedrückter Menütaste über 
dem Menütitel befindet. Die Va¬ 
riable »MenuName« der Menu- 
Struktur Ist ein Zeiger auf den 
Menütitel. »Firstitem« enthält 
die Adresse der ersten 
Item-Struktur. 

Die restlichen vier Variablen 
der Menu-Struktur brauchen 
wir nicht zu beachten, sie wer¬ 
den von Intuition verarbeitet. 

Alle Menu-Strukturen sind, 
wie oben kurz angedeutet, mit¬ 
einander verkettet. Bei der In¬ 
itialisierung müssen Sie beach¬ 
ten, daß diese Strukturkette von 
unten nach oben aufgebaut 
werden muß, da bei der Verein¬ 
barung einer Struktur die nach¬ 
folgende schon bekannt sein 


muß. Diese Art der statischen 
Initialisierung haben wir bereits 
bei den Gadgets kennenge¬ 
lernt. Um Ihnen den Einstieg in 
die Programmierung der Intui¬ 
tion-Menüs zu erleichtern, ha¬ 
ben wir in unserem Headerfile 
Tool.h die Funktion GetMe- 
nu(&men,&win,left,width,flags, 
&titel) eingebaut. GetMenuQ 
(siehe in Listing 1) initialisiert ei¬ 
ne Menu-Struktur und setzt sie 
an den Anfang einer Menüket¬ 


te. Die Parameter von links 
nach rechts: 

men ist der Zeiger auf eine 
Menu-Struktur; 

Win ist der Zeiger auf das 
Window, für das ein Menü ein¬ 
gerichtet werden soll; 

left ist die X-Position des Me¬ 
nütitels; 

width legt die Breite des Ti¬ 
tels fest; 

flags beinhaltet die Menu- 
Flags und 



Bild 5. Alle Elemente eines Intuition-Menüs sind verkettet, so daß ein einziger Aufruf 
ausreicht, um es in einem Window zu installieren 
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title ist ein Zeiger auf den 
MenU'Titeltext. 

Für die Variable NextMenu 
übernehmen wir die in der Win¬ 
dow-Struktur unter »Menu- 
Strip« gespeicherte Adresse. 
Dafür sichern wir dort die 
Adresse der gerade vorliegen¬ 
den Menu-Struktur. Wir schie¬ 
ben sozusagen die neu initiali¬ 
sierte Struktur an die erste Stel¬ 
le der Strukturkette. Um die 
ganze Kette zurückverfolgen zu 
können, muß ja, wegen der Ver¬ 
kettung, nur die erste Struktur 
bekannt sein. Aus diesem 
Grunde dient diese auch als Pa¬ 
rameter für die Funktion SetMe- 
nuStrip(&win,&menu). Der Auf¬ 
ruf dieser Funktion installiert 
den angegebenen MenuStrip 
auf dem Window, dessen 
Adresse als erster Parameter 
übergeben wurde. Bei aktivem 
Window ist nun das Menü an¬ 
sprechbar. Die Initialisierung ei¬ 
nes dreiteiligen Menüs könnte 
etwa so aussehen: 

for(i=2;i>=0;i—)[ 
GetMenu([1],&wl,w,f, 


SetMenuStrip(&w,8dii[0]); 

Wenn wir so Vorgehen, lie¬ 
fert, wie wir später noch sehen 
werden, das Macro MENU- 
NUM() bei der Menüabfrage ei¬ 
nen Wert, der dem Index des 
gewählten Menüs entspricht. 
Einen Beispielaufruf von Get- 
MenuO finden sie in Listing 36. 

Was uns jetzt noch fehlt, sind 
die Menüpunkte, die soge¬ 
nannten Items, die bei der An¬ 
wahl des Menütitels »aufklap¬ 
pen«. 

Funktion und Aussehen die¬ 
ser Items beschreiben wir, wie 
schon angedeutet, mit der Me- 
nultem-Struktur (Listing 35). 

Alle Items eines Menüs sind 
über das erste Element der Me- 
nultem-Struktur, dem Zeiger 
Nextitem, miteinander verket¬ 
tet. Bild 5 zeigt, wie die Variable 
Firstitem der Menu-Struktur auf 
das erste Glied der Menuitem- 
Strukturkette verweist. 

Flexible Menüs 
mit Flags 

Die Variablen LeftEdge, Top- 
Edge, Width und Height be¬ 
schreiben hier die Position und 
Dimension der Item-Box. Diese 
Angaben beziehen sich auf die 
Position des Menütitels in der 
Titelleiste. Geben Sie also bei¬ 
spielsweise 0 für LeftEdge an, 
so befindet sich die linke Seite 
des Items genau unter der lin¬ 
ken Seite des Menütitels. 

Für die Menuitems stehen 
uns eine Menge Flags zur Ver¬ 


fügung. Wir besprechen Sie in 
der im Headerfile Intuition.h de¬ 
finierten Reihenfolge: 

»CHECKIT« Das Item wird zu 
einem Ein-/Aus- Schalter, ei¬ 
nem sogenannten Attri- 
but-ltem. Der aktuelle Zustand 
wird mit einem Häkchen ange¬ 
zeigt. 

»ITEMTEXT« In der Itembox 
soll Text dargestellt werden. Der 
Zeiger ItemFill (siehe unten) 
zeigt in diesem Fall auf eine In- 
tuiText-Struktur. 

»COMMSEQ« Setzen Sie 
dieses Flag, wenn das Item 
auch mit einer Tastenkombina¬ 
tion anwählbar sein soll. Die 
Kombination besteht aus der 
rechten Amigataste und einer 
beliebigen Zeichentaste. Kom¬ 
binationen dieser Zeichentaste 
mit der < ALT >-Taste sind er¬ 
laubt. Zwischen geshifteten 
und ungeshifteten Tasten wird 
nicht unterschieden. Geben Sie 
das gewünschte Zeichen unter 
»Command« in der Menultem- 
Strukturan. Intuition zeigt dann 
die Tastenkombination in der 
Item-Box an. 

»MENUTOGGLE« Ist dieses 
Flag gesetzt, kehrt Intuition bei 
der Anwahl eines Attribut-Item 
den Zustand des CHECKED- 
Flags um und zeichnet (oder 
löscht) das Häkchen entspre¬ 
chend. 

»ITEMENABLED« Man kann 
das Item nur anwählen, wenn 
ITEMENABLED gesetzt ist (sie¬ 
he auf MENUENABLED). Wie 
Menüs können auch Items mit 
der Funktion OffMenuO aus- 
und mit OnMenuQ eingeschal¬ 
tet werden. Hierzu erfahren Sie 
später mehr. 

»HIGHFLAGS« Hat den glei¬ 
chen Effekt wie HIGHNONE. 
Man sollte HIGHFLAGS nicht 
setzen, denn es handelt sich 
nur um einen Überbegriff für 
die vier folgenden Flags. Diese 
beschreiben das Aussehen der 
Items bei der Anwahl: 

»HIGHIMAGE« Das unter Se- 
lectFill (siehe unten) beschrie¬ 
bene Element wird angezeigt. 
»HIGHCOMP« Anzeige des 
Items in Itomplementärfarben. 

»HIGHBOX« Zeichnet einen 
Rahmen um die Itembox. 

»HIGHNONE« Bewirkt keine 
Veränderung bei der Anwahl. 

»CHECKED« Ist dieses Flag 
gesetzt, zeichnet Intuition vor 
den Itemtitel eines Attribut- 
Items ein Häkchen. Lassen Sie 
daher vor dem Titel, etwa durch 
das Voranstellen zweier Leer¬ 
zeichen, ausreichend Platz. 
Möchten Sie gerne ein eigenes 
Häkchen venvenden, initialisie¬ 
ren Sie den Zeiger »Check- 
Mark« der Window-Struktur mit 
der Adresse des entsprechen¬ 
den Images. 


/* 

\\ CLIcol.c - Demo Pulldown-Menues 

*/ 

#lnclude 'TOOL.h' 


LONG ex[]=[ /* HutualExolude-Werte für die Items der 

Menues 2 und 3 */ 

14,13,11,7 

1 ; 

BYTE c[2][4]=l /* Comrtiand-Keys für die Items 

der Menues 2 und 3 */ 

'1’.'2','3','4' 

i; 

BYTE *Mtitein=( /* Die Titel der Menues 1-3 */ 

'CLICol", 

•Vordergrund", 

"Hintergrund" 

struct IntulText SI[2]=! /* Text für die Subltems des Item 1 

in Menu 1 */ 

2,0,JAM1,30,5,NULL,(UBYTE »)"» Gölzy's CLICol *',NTJLL, 
3,0,JAM1,30,5,NULL,(UBYTE »)"Wlrkllch beenden ?',NULL 

j; 

struct IntulText ml[2]=( /* Text für die Items 

ln Menu 1 »/ 

0,0,JAM1,0,0,NULL,(UBYTE *)"About",NULL, 

3,0,JAM1,0,0,NULL,(U8YTE »j-Ende '.NULL 


struct IntulText in2[4]=| 

Menues 2 und 3 */ 

2,0,JAM1,0,0,NULL,(UBYTE *) 
2,0,JAM1,0,0,MULL,(UBYTE ») 
2,0,JAMl,0,0,NULL,{UBnE ») 
2,0,JAM1,0,0,NULL,(UBYTE ») 

1 ; 

VOID malnO 


/* Text für die Items der 

Blau ".NULL, 

Weiß '.NULL, 

Schwarz'.NULL, 

Rot '.NULL 


struct Window »wln; 
struct Menu men[3]; 
struct Menuitem Il[2],I2[2][4],S1[2]} 

SHORT 1, ende«0j 

USHORT Code,Cfl=ITEMTEXTl ITEMENABLEDl HIGHBOX,/* Item-Flags 
ln Menu 1 und */ 

Ffl»CKECKITl ITEMTEXTI ITEMENABLEDl HIGHCOMPl COMMSEQ; /* 
Menu 2 + 3 */ 

ULONG dass; 
lf(OpenLib()) exlt(0){ 

ModlfyIDCMP((win=ACTIVE_WINDOW),MENUPICK); 
for(l=2;i>=0;l—}( /* TOOL.h Funktion CetMenu(): Menuheader 
installieren »/ 

GetHenu(6roen[l],win,l«100,100,HENUENABLED,Mtitel[i]); 

! 

for(i=l;l>*0;l —){/* Menuitems und Subltems für linkes Menu 
Installieren */ 

CetItem(&menEO],8iIl[l],0,i»10,100,10,Cfl,0,&ml[i],NULL,0); 

GetSIteffl(&Il[i],&Sl[i],100,10,200,20,Cfl,0,&SI[l],NUU,0); 

1 

for(i=3;l>=0;i—)( /* Menuitems für mittleres Menu 

installieren */ 

GetItera(8anen[l],iI2[0][l),0,i»10,120,10,Ffl,ex[l],&n2[l], 

NULL,c[0][i]); 

] 

for(i=3ji>=0;i—){ /* Menultems für rechtes Menu 

installieren */ 

GetItem(8jnen[2],&I2[l][i], 0,1*10,120,10, Ffl,ex[i],&m2[i], 
NULL,c[l]tl3); 

) 

SetMenuStrip(wln,&men[0]);/* kompletter MenuStrip in CLI-Ulndo« 

aufbauen */ 

while(ende==0)[ 

Wait(l< <wln->UserPort->mp_SigBit) j 
class=GetMessage(win,&code,0,0); 
switch(cla8s)[ 

case MENUPICK:[ /* Ein Menü wurde 

argew6hlt */ 

lf(code!=HENUNULL)( 

swltch{MEKUNUM(code))[ /» Menu-Nummer 

ermitteln */ 

case 0:[ /* 1. Menu in Strukturkette wurde 
angewöhlt */ 

Listing 36. CLICol demonstriert: die Tool.h-Funktionen 
GetMenuO, GetltemQ und GetStternQ erleichtert das 
Arbeiten mit Intuition-Menüs 
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switch(ITEMNUM(code)){ /* Item-Nummer 
ermitteln */ 


case 0: break; 

/» 

Item 

1 der 

Itemkette */ 




case 1:| 

/* 

Item 

2 der 

Itemkette */ 




if(SUBNUM(code)= 

*0) 

ende 

++; 


/»Subltem-Nr.*/ 

break} 

) 

1 

break} 

1 

case 1:( /* 2. Menu ln Strukturkette wurde 
angewählt «/ 

switch(ITEMNUM(Code)) ( 

case 0:{ /* Item 1 gewählt: 

Vordergrund Blau »/ 

print f (*\033 [30m*c\n 12); 
break; 

) 

case 1:{ /» Item 2 gewählt: 

Vordergrund Weiß »/ 

printf ('\033PlniXc\n',l2) j 
break; 

) 

case 2:( /* Item y. 

Vordergrund Schwarz »/ 

printf ('\033[32m!{c\n',12); 
break; 

1 

case '}•.{ /* Item 4 bedeutet 

Vordergrund Rot •/ 

prlntf{ '\033[33mJc\n',12); 
break; 



break; 


case 2:( /» 3- Menu ln Strukturkette wurde 
angewählt */ 

8 witch(ITEMNUM(code))[ 

case 0:( /* Item 1 gewählt: 
Hintergrund Blau */ 

printf { '\033C40mXc\n', 12); 
break; 

} 

case 1:( /» Item 2 gewählt: 
Hintergrund Weiß */ 

printf (•\033 [4lm*c\n', 12); 
break; 

I 

case 2:( /» Item 3: 

Hintergrund Schwarz »/ 

printf ('\033[42m*c\nM2)} 
break} 

1 

case 3:( /* Item 4 bedeutet 

Hintergrund Rot */ 

printf('\033[43m*c\n',12); 
break; 

5 

) 

break; 

i 

} /» switch Menu »/ 

} /* If MENUNUU »/ 

break; 

) /* case MENUPICK */ 

) /* switch dass »/ 

1 /» while »/ 

ClearHenuStrlp(win)} /« MenuStrip aus CLI-Window 

löschen »/ 

HodlfyIDCMP(wln,0); /* IDCMPFlags des CLI-Window wieder auf 
null setzen •/ 

i 

Listing 36. (Schluß) 


Die restlichen drei Flags setzt 
und löscht Intuition selbst, man 
kann sie abfragen, um be¬ 
stimmte Informationen zu erhal¬ 
ten: 


»ISDRAWN« Das Item ist 
sichtbar; 

»HIGHITEM« Der Mauszei¬ 
ger befindet sich über einem 
Item; 


»MENUTOGGLED« Ein Attri¬ 
but-Image wurde angewählt. 
Dieses Flag abzufragen ist nur 
bei gesetztem MENU- 
TOGGLE-Flag sinnvoll. 

Mittels eines 32 Bit breiten 
Wertes - »Mutual-Exclude« - 
beschreiben wir, welche 
Attribut-Items eines Menüs sich 
gegenseitig ausschließen. Was 
bedeutet das? Angenommen 
Sie arbeiten mit einem Zei¬ 
chenprogramm. 

In einem Menü stehen dort 
mehrere Pinseibreiten zur Aus¬ 
wahl. Natürlich kann man im¬ 
mer nur mit einer Pinselbreite 
zeichnen. Das entsprechende 
Item ist im Menü mit einem 
Häkchen gekennzeichnet, das 
Flag CHECKED ist gesetzt. 

Bei der Wahl einer anderen 
Pinselbreite wird das 
CHECKED-Fiag und damit 
auch das Häkchen des gerade 
aktiven Items gelöscht. Intuition 
setzt das Flag in der Struktur 
des neu gewählten Items und 
zeichnet vor den Itemnamen 
das Häkchen. Die neue Pinsel¬ 
breite ist aktiv. 

In unserem Beispiel schließt 
jeder Menüpunkt alle anderen 
aus. Ein Menü setzt sich aus 
maximal 32 Items zusammen. 
Jedes Bit des unter MutualEx- 
clude gespeicherten Wertes re¬ 
präsentiert ein Item des Menüs. 
Ein gesetztes Bit bedeutet den 
Ausschluß des korrespondie¬ 
renden Items. 

Mehrfach¬ 
auswahl möglich 

Dem ersten Item, die Menu- 
Strukturkomponente Firstitem 
verweist darauf, ist Bit 0 zuge¬ 
ordnet, dem zweitem Item Bit 1 
etc. 

In CLICol (Listing 36) finden 
Sie eine Anwendung von Mu- 
tualExclude. Dort schließen 
sich alle Items in jedem Farb- 
menü gegenseitig aus. 

Die nächste Komponente der 
Menultem-Struktur ist der Zei¬ 
ger »ItemFill«. Er zeigt auf eine 
Image-Struktur oder, falls das 
ITEMTEXT-Flag gesetzt ist, auf 
eine IntuiText-Struktur. Image 
oder Text sind sichtbar, solange 
sich der Mauzeiger nicht über 
dem Item befindet. 

»SelectFill« verweist dage¬ 
gen auf die Struktur eines Ele¬ 
mentes (Text oder Image), das 
bei der Anwahl des Items sicht¬ 
bar sein soll. Voraussetzung 
dafür ist allerdings, daß das 
HIGHIMAGE-Flag gesetzt ist. 

»Command« beinhaltet das 
Zeichen der Taste, die zusam¬ 
men mit der rechtem Amigata- 
ste ebenfalls zur Anwahl eines 
Items führt. Die Variable Sub- 
Item beinhaltet die Adresse ei¬ 


nes Untermenüpunktes (Sub- 
Item) oder NULL, wenn das 
Item über keine Untermenüs 
verfügt. 

Die letzte Variable der Menu¬ 
ltem-Struktur ist »NextSeiect«. 
Intuition legt dort bei einer 
Mehrfachauswahl, also der An¬ 
wahl mehrerer Menüpunkte mit 
der linken Maustaste, die soge¬ 
nannte »MenuNumber« des 
nächsten Item oder Subitem 
ab. Diese Menünummer ist ein 
16-Bit-Wert. Die fünf oberen 
Bits stehen für das gewählte 
Subitem, die nächsten sechs 
für das Item und die fünf nieder¬ 
wertigen Bits für das aus dem 
MenuStrip gewählte Menu. 

Hat der Anwender einen oder 
mehrere Menüpunkte gewählt, 
sendet uns Intuition über den 
Messageport eine Nachricht 
von der Class »MENUPICK«. 
Die Variable Code der Messa¬ 
ge-Struktur enthält nun die Me¬ 
nünummer der letzten Wahl. 
Falls aber mehrere Menüpunk¬ 
te selektiert wurden, finden wir 
unter NextSeiect in der Menu¬ 
ltem-Struktur des gerade zu be¬ 
arbeitenden Items (Subitems) 
eine weitere Menünummer; 
menunumber=item-> 
NextSeiect; 

Diese MenuNumber steht für 
die vorletzte Wahl. Doch wie 
kommen wir zu der Adresse des 
betreffenden Items? Intuition 
hält hierfür eine spezielle Routi¬ 
ne bereit; ltemAddress(&menu, 
menunumber). Der erste Para¬ 
meter ist ein Zeiger auf das er¬ 
ste Menü im MenuStrip, wie bei 
der Funktion SetMenuStripQ 
angegeben. Weiter müssen wir 
noch den Wert der Message- 
Strukturvariablen Code, also 
die MenuNumber, übergeben. 
Wenn die Möglichkeit der Mehr¬ 
fachauswahl erhalten bleiben 
soll, muß das Programm nach¬ 
einander alle Strukturen solan¬ 
ge prüfen, bis es als Wert für 
NextSeiect das Symbol MENU¬ 
NULL findet. Folgendes Pro¬ 
grammfragment übernimmt 
diese Aufgabe: 
menunumber=Message-> 
Code; 

while(menunumber != 
MENUNULL)[ 

ltem=ItemAddress 

(&menu,menunumber); 

menunumber=itera-> 

NextSeiect; 

] 

Auch die Menu Item-Struktu¬ 
ren muß man bei der Initialisie¬ 
rung von unten nach oben auf¬ 
bauen. Einfacher und platzspa¬ 
render, - vor allem dann, wenn 
man mit vielen Menuitems ar¬ 
beitet, - ist jedoch die Methode, 
alle Strukturen in einer speziel- 
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len Funktion mit Werten zu be¬ 
legen. Sie haben es sich sicher 
schon gedacht - solch eine 
Funktion finden Sie in Tool.h; 

Getltem{&m,&i,l,t,w,h,f.me, 
&lf,&Sf,c) arbeitet im Prinzip 
wie GetMenuO- Wir benutzen 
hier die Variable Firstitem der 
Menu-Struktur als Zwischen¬ 
speicher zum Aufbau der Item- 
Kette. Auch hier gilt: die zuletzt 
initialisierte Struktur ist das er¬ 
ste Glied der Struktur-Kette. 

Einfacher Aufruf 
mit Get-Item 

Die Funktion verlangt folgen¬ 
de Parameter: 

&m ist die Adresse des Me¬ 
nüs, unter dem das Item er¬ 
scheinen soll; 

&i übergibt die Adresse der 
Menultem-Struktur; 

l,t,w,h legen Position und Di¬ 
mension des Items fest; 
f sind die Flags; 
me nimmt die Flags für Mu- 
tualExclude auf; 

&lf und &Sf sind die Zeiger 
ItemFill und SelectFill; 

c ist der Shortcut für das 
Commandzeichen. 

Listing 38 demonstriert den 
Aufruf der neuen Tool.h- 
Funktion GetltemO- Bevor wir 
uns näher mit dem Beispielpro¬ 
gramm beschäftigen, bespre¬ 
chen wir noch das letzte 
Menü-Element - das Subitem. 

Durch die Verwendung von 
Subitems werden Items zu Un¬ 
termenütiteln. Bewegt man den 
Mauszeiger über einen Unter¬ 
menütitel, öffnet sich ein Unter¬ 
menü welches wieder aus meh¬ 
reren Auswahlmöglichkeiten, 
den sogenannten Subitems, 
bestehen kann. 

Subitems werden mit der uns 
bekannten Menultem-Struktur 
beschrieben. Alle Subitems 
sind wieder mit der jeweils er¬ 
sten Strukturkomponente mit¬ 
einander verkettet. Die Menu- 
Item-Strukturvariable Subitem 
venveist auf das erste Glied die¬ 
ser Strukturkette. 

Die Handhabung der Sub- 
Items ist völlig identisch mit der 
der Menuitems. Eine weitere 
Verschachtelung in SubSub- 
Items ist zwar denkbar. Intuition 
ignoriert jedoch die Subltem- 
Variable eines Subitems. Get- 
SltemQ hilft Ihnen bei der Instal¬ 
lierung eines Untermenüs. Die 
Funktion GetSltem(&i,&s,l,t,w, 
h,f,m,&lf,&Sf,c), die Sie eben¬ 
falls in Tool.h finden, verlangt 
fast die gleichen Parameter wie 
GetltemO- 
Die Unterschiede: 

&i ist der Zeiger auf das Item, 
unter dem sich das Subitem 
einordnen soll; 

&s verweist auf das Subitem 


selbst. Die restlichen Parame¬ 
ter haben die gleiche Bedeu¬ 
tung wie weiter oben für die 
Funktion GetltemO erläutert. 

Hat man alle Menu- und Me- 
nultem-Strukturen vereinbart, 
installiert ein Aufruf der Funk¬ 
tion SetMenuStripO das Menü 
in einem Window. Das Gegen¬ 
stück dazu, ClearMenuStrip 
(&win), löscht das Menü. Die 
Funktion fordert lediglich den 
Zeiger auf das Window als Ar¬ 
gument. 

Wie weiter oben schon ange¬ 
sprochen, benachrichtigt uns 
Intuition über den Message¬ 
port, wenn ein Menü bedient 
wurde. Hat der Anwender die 
rechte Maustaste betätigt, aber 
kein Element aus dem Menü 
selektiert, so finden wir in 
der IntuiMessage-Struktur- 
variablen Code das Symbol 
MENUNULL. 

Ansonsten hinterlegt Intui¬ 
tion dort die Menünummer, aus 
welcher sich der gewählte Me¬ 
nüpunkt ermitteln läßt. Im 
Headerfile Intuition,h sind für 
diesen Zweck drei Macros defi¬ 
niert: 

MNr=MENUNUM(Code); 

INr=:ITEMNUM(Code); 

SNr=SUBNUM(Code); 

Jedes Macro liefert einen 
Wert von 0 bis n, der der Num¬ 
mer der Struktur innerhalb der 
jeweiligen Strukturkette ent¬ 
spricht. Wurde kein Subitem re¬ 
gistriert, erhalten wir den Wert 
»NOSUB«. Dementsprechend 
kehren die Macros mit »NOME¬ 
NU« oder »NOITEM« zurück, 
wenn sie keine Menü- bezie¬ 
hungsweise Itemnummer er¬ 
mitteln konnten. 

Auch der umgekehrte Weg ist 
möglich: 

MCode=SHIFTMENU(Nr); 
ICode=SHIFTITEM(Nr); 
SCode=SHIFTSUB(Nr); 

A und O: die 
Menünummer 

Diese Macros errechnen aus 
einer bekannten Menu-, Item¬ 
oder Subitemnummer den ent¬ 
sprechenden Code und sind 
daher im Zusammenhang mit 
den Funktionen OffMenuQ und 
OnMenuO von besonderer Be¬ 
deutung. Wie Sie wissen, for¬ 
dern beide Funktionen neben 
dem Windowpointer die Menü- 
Nummer als Argument. 

Durch Addition der verschie¬ 
denen Codes läßt sich die Me¬ 
nünummer leicht errechnen. 
Möchte man beispielsweise 
das Item 1 im Menü 1 ausschal¬ 
ten, könnte der Funktionsaufruf 
etwa so aussehen: 


menunumber=SHIFTMENU(l)-f 
SHIFTITEM(l); 
OffMenu(&win, 
raenunumber); 

Der Wert, der als Parameter 
in OffMenuO das komplette 
Menu mit der Nummer 1 aus¬ 
schaltet, errechnet sich aus: 
SH1FTMENU(1)+SHIFTITEM 
(NOITEM). 

Schauen wir uns das alles an 
einem praktischen Beispiel an. 
CLICol, unser Listing 38, öffnet 
im aktiven CLl-Fenster einen 
MenuStrip, der die Wahl ver¬ 
schiedener Farben für Vorder- 
und Hintergrund erlaubt. Zu Be¬ 
ginn des Programms legen wir 
in verschiedenen Arrays die 
Menü-Titel und die IntuiText- 
Strukturen der Items an. In der 
Hauptfunktion mainQ vereinba¬ 
ren wir dann die notwendigen 
Menu- und Menultem-Struktu- 
ren. Nach dem Öffnen der Li¬ 
braries setzt die Funktion Modi- 
fylDCMPO im CLl-Fenster das 
MENUPICK-Flag. Jetzt steht 
der Installation eines Menu- 
Strips im CLl-Fenster nichts 
mehr im Wege. In einer Schleife 
legt uns GetMenuQ drei Menüs, 
men[2] bis men[0], an. Menü 
men[oj ist das zuletzt definierte 
und dient daher später als Para¬ 
meter beim Aufruf der Funktion 
SetMenuStripO. Wird men[0] 
gewählt, liefert das Macro ME- 
NUNUMO den Wert 0. dem In¬ 
dex entsprechend. 

Es folgt die Initialisierung der 
Items für men(0] und deren 
Subitems. Die beiden nächsten 
Schleifen bauen die Items der 
restlichen Menüs auf. Die 
Flags, in der Variablen »Ffl« ge¬ 
speichert, geben darüber Aus¬ 
kunft, daß es sich um Attribut- 
Items mit Text und l^mmando- 
sequenzen handelt. 

Die MutualExclude-Werte, im 
Array ex(] zu finden, verraten, 
daß sich die Items gegenseitig 
ausschließen. Wenn Sie mit 
MutualExclude noch Probleme 
haben, schreiben Sie sich am 
besten die Werte doch einmal 
in binärer Form untereinander- 
dann fällt Ihnen sicher die Kor¬ 
respondenz zwischen gesetz¬ 
ten Bits und Menüpunkten auf. 

Der Funktion SetMenuStripO 
schließt sich eine while-Schlei- 
fe an, in deren Rumpf das Pro¬ 
gramm auf eine Intuition-Nach¬ 
richt wartet. Ist diese Nachricht 
gleich MENUPICK, so ermitteln 
wir über MENUNUMO das ge¬ 
wählte Menü. 

Für jedes Menü ist innerhalb 
der switch-Anweisung ein case- 
Zweig eingerichtet. In jedem 
Zweig prüfen wir, wiederum mit 
einer switch-Anweisung, wel¬ 
ches Item registriert wurde. Als 
Argument dient uns dabei das 


Resultat des Macros ITEM- 
NUMQ. 

Entsprechend dem gewähl¬ 
ten Item schalten die soge¬ 
nannten »Console-Control- 
Sequenzen« Vorder- oder Hin¬ 
tergrundfarbe um. Im Menü¬ 
punkt Ende des ersten Menüs 
ist eine »Sicherheitsabfrage« in 
Form eines Subitems einge¬ 
baut. Wählt man das Subitem, 
so erfüllt die Inkrementierung 
der Variablen »ende« das 
Schleifenkriterium. Es folgt, 
nachdem MenuStrip und 
IDCMP-Flags gelöscht sind, 
das Programmende. 

Versuchen Sie doch einmal 
das Programm zu erweitern 
oder zu verändern. Da es ohne¬ 
hin für das CLl-Fenster konzi¬ 
piert ist, könnte man in Verbin¬ 
dung mit der ExecuteO-Funk- 
tion häufig benutzte CLI- 
l^mmandos oder sogar Kom- 
mandofoigen, wie zum Beispiel 
Compiler-Optionen, einbauen. 
Wenn Sie CLICol mit »RUN« 
starten, können Sie problemlos 
im CLt Weiterarbeiten. 

Dem Guru auf 
den Zahn gefühlt 

Nachdem nun die Menütech¬ 
nik besprochen ist, könnten Sie 
auch Ihre eigenen Programme, 
etwa ein Malprogramm, mit 
Intuition-Menüs bereichern. 

Es gibt sicher noch einiges 
zu tun, wenn wir alle System¬ 
routinen in den Griff bekommen 
wollen. Aber je mehr Sie mit 
den Systemroutinen arbeiten, 
um so weniger Fehler machen 
Sie. 

Apropos Fehler - hatten Sie 
auch schon mal beim Start ei¬ 
nes eigenen Programms solch 
ein lustiges rotes Kästchen, das 
auf schwarzem Grund hämisch 
blinkend den Systemabsturz 
ankündigt? 

Der Aufforderung »Press left 
mouse button to continue« 
kommt man in der Aufregung 
oft zu schnell nach, die angege¬ 
bene Gurunummer verschwin¬ 
det unbeachtet. Dabei kann 
man mit Hilfe dieser Nummer 
den aufgetretenen Fehler ein¬ 
kreisen, oft sogar genau be¬ 
stimmen. 

Leider ist in keinem der mit¬ 
gelieferten Handbücher eine 
detaillierte Beschreibung der 
möglichen Ziffernkombinatio¬ 
nen zu finden. Grund genug, 
einmal im Rahmen eines Pro¬ 
grammierkurses darauf einzu¬ 
gehen. Schließlich werden Sie 
bei kaum einem anderen Com¬ 
puter so komfortabel bei der 
Fehlersuche unterstützt. 

Es handelt sich bei der Guru¬ 
nummer nicht etwa um eine rie¬ 
sige Fließpunktzahl, sondern 
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BB 

Fehierklasse 

01 

kein Speicher 

02 

Library konnte nicht erzeugt werden 

03 

Library läßt sich nicht öffnen 

04 

Device iäßt sich nicht öffnen 

05 

Hardware-Fehier 

06 

i/O-Fehler 

07 

kein I/O-Signal 


Tabelle 14. Erste Hinweise auf den Fehler: die Fehierklasse 
der Gurunummer 


um eine Kombination von Zif¬ 
fern, die zusammen Hinweise 
auf die Fehlerursache und den 
Fehlerort geben können. 

Die Nummer hinter dem ver¬ 
meintlichen Dezimalpunkt stellt 
die Adresse des fehlerhaf¬ 
ten Tasks in hexadezimaler 
Schreibweise dar. Der Task, der 
wegen eines Fehlers die folgen¬ 
de Nummer in einer Alarmmel¬ 
dung erscheinen läßt, 

84010002.00203750 

beginnt ab der Adresse 
$203750. Die acht Ziffern vor 
dem Punkt deuten auf den Feh¬ 
ler selbst hin. Man kann sie in 
drei Gruppen einteilen: 
AABBCCCC 

Das erste Byte, hier bezeich¬ 
net mit »AA«, teilt uns mit, in 
welchem Teil des Betriebssy¬ 
stems der Fehler auftrat. Byte 
»BB« enthält die Fehlerklasse in 
Form einer allgemeinen Dia¬ 
gnose (siehe Tabelle 14). Spei¬ 
cherwort »CCCC«, die vier Zif¬ 
fern vor dem Punkt, beschreibt 
spezielle Fehler des unter »AA« 
aufgeführten SubSystems. 

Wenn möglich, gibt die erste 
Ziffer (Nibble) von »AA« die Art 
der Alarmmeldung, auch Alert 
genannt, an. Wir unterscheiden 
0 für rückkehrfähige (RECOVE- 
RABLE_ALERT) und 8 für 
nicht rückkehrfähige Alerts 
(DEADEND_ALERT). 

Die erste Gruppe ist oft, ne¬ 
ben der führenden 0 der Guru¬ 
nummer, daran zu erkennen, 
daß sie den aktuellen Screen 
nur um die Höhe des Alerts 
nach unten schiebt. Nach ei¬ 
nem Klick auf die rechte Maus¬ 
taste erfolgt der Rücksprung ins 
Programm. Meist kann man 
dann Weiterarbeiten. 

Deadend Alerts kündigen 
den Systemabsturz auf schwar¬ 
zem Bildschirm an. Hier wird 
nach Betätigung der rechten 
Maustaste der interne Debug¬ 
ger aufgerufen, welchen man 
mit einem am seriellen Port an¬ 
geschlossenen Terminal bedie¬ 
nen kann. 

Folgt man jedoch der freund¬ 
lichen Aufforderung, die linke 
Maustaste zu betätigen, so er¬ 


folgt in beiden Fällen der Neu¬ 
start des Systems. Betrachten 
wir nun Byte »AA« genauer. In 
Tabelle 15 sind alle möglichen 
(genauer: uns bekannten) Co¬ 
des den entsprechenden Be¬ 
triebssystemtellen gegenüber¬ 
gestellt. 

Alle Ziffern mit einer führen¬ 
den Null stehen dabei für Libra¬ 
ries, die mit einer Eins begin¬ 
nen für Devices und solche mit 
einer zwei am Anfang für Re¬ 
sources. 

Hinter dem SubSystem sind, 
soweit vorhanden (beziehungs¬ 
weise uns bekannt) die jeweili¬ 
gen speziellen Fehler aufgeli¬ 
stet. Sie sind, wie erwähnt, mit 
dem Speicherwort »CCCC« vor 
dem Punkt der Gurunummer 
beschrieben. 

Der Guru als 
Debugginghilfe 

Sind die ersten beiden Zif¬ 
fern, also »AA«, gleich Null, so 
handelt es sich um eine Prozes¬ 
sor-Fehlermeldung (CPU- oder 
Prozessor-Trap). In diesem Fall 
ist auch die Fehlerklasse gleich 
0. Der Fehler wird mit einer ein¬ 
zigen Ziffer, der Trap-Nummer, 
beschrieben. In Tabelle 16 sind 
die möglichen Werte aufgeli- 
stet. 

Wie Sie der Tabelle entneh¬ 
men können, existieren Traps, 
bei denen es sinnvoll ist, sie ab¬ 
sichtlich zu erzeugen. Ein Bei¬ 
spiel dafür ist der Trace-Modus. 

Vielleicht fotokopieren Sie 
sich die Tabellen und hängen 
sie über dem Monitor auf. So 
sind Sie in der Lage, alle Guru¬ 
nummern zu entschlüsseln und 
können sich Zeit und Ärger spa¬ 
ren. Hier noch zwei Beispiele: 

04010003-00203750 

Der Fehler trat - die 4 verrät 
es - in der Intuition-Library auf. 
Der Grund war (01) Speicher¬ 
mangel, genauer (0003) fehlen¬ 
der Speicher zur Darstellung ei¬ 
nes Untermenüs. Der fehlerhaf¬ 
te Task beginnt ab Adresse 
$203750. 

82010008.00203750 


Die 8 am Anfang der Num¬ 
mer kündigt den bevorstehen¬ 
den Systemabsturz an. Der 
Fehler wurde in der Graphics- 
Library (2) lokalisiert, weil kein 
Speicherplatz (01) zum Füllen 
(0008) zur Verfügung stand. 
Solche Fehler können bei¬ 
spielsweise dann auftreten, 
wenn vor der Anwendung der 
FloodO-Funktion kein oder ein 
zu kleines Temporärraster ver¬ 
einbart wurde. 

Mit den oben besprochenen 
Fehlermeldungen in Form ei¬ 
nes Alerts, quittiert uns das Be- 
triebssystemtei! Exec unsere 
Fehler. Demnach müssen dort 
auch die entsprechenden 
Funktionen zu finden sein, um 
solche Alerts zu erzeugen. 

Tatsächlich stellt uns Exec ei¬ 
ne Funktion namens Alert(Nr,n) 
zur Verfügung, mit deren Hilfe 
wir sehr einfach die rotblinken¬ 
den Alarmmeldungen in eigene 
Programme einbinden können. 

Als ersten Parameter ver¬ 
langt sie die Nummer, die als 
Guru-Nummer im Alert erschei¬ 
nen soll. Im Headerfile exec/ 
alerts.h sind verschiedene 
Nummern als symbolische 
Konstanten vereinbart. Wir un¬ 
terscheiden vier Nummernty¬ 
pen: 

AT-Nummern geben an, ob 
das Alert rückkehrfähig ist oder 
nicht, AO-Nummern bezeich¬ 
nen den Fehlerbereich, AG- 
Nummern liefern die Fehler¬ 
klasse und AN-Nummern den 
genauen Fehler, auf den Feh¬ 
lerbereich bezogen. 

AN-Nummern eignen sich di¬ 
rekt als Parameter für Alert(), je¬ 
doch kann man sich durch 
»ODER«-Verknüpfung anderer 
Symbole eigene Nummern zu¬ 
sammenstellen. 

Exec schiebt den aktiven 


Screen um die Höhe des Alerts 
nach unten, wenn der Parame¬ 
ter n der AlertQ-Funktion gleich 
Null Ist. Ein Neustart erfolgt nur 
wenn der erste Parameter das 
Symbol AT-DeadEnd beinhal¬ 
tet. 

Gibt man für n eine eins oder 
eine andere ungerade Zahl an, 
erscheint das bekannte »Soft¬ 
ware error«-Requester. Der 
Alert präsentiert sich nach der 
Anwahl von »Cancel«, auf 
schwarzem Bildschirm. Da¬ 
nach erfolgt der Neustart des 
Systems. Hier ein vergleichs¬ 
weise »harmloser« Beispielauf¬ 
ruf der Funktion: 

#include <exec/ 
alerts. h> 
raain() 

[ 

Alert(AN_TextTmpRas,0); 

] 

Nicht sehr komfortabel, aber 
wirkungsvoll und schnell in ei¬ 
gene Programme installiert. In- 
tuition-Alerts bieten allerdings 
schon etwas mehr. Die Funk¬ 
tion DisplayAlert(Art,&Text, 
height) schiebt den aktuellen 
Screen soweit nach unten, daß 
eine genau »height« Pixel hohe 
Alarmmeldung Platz findet. 

Die Alertart gibt an, ob es 
sich um einen rückkehrfähigen 
(RECOVERY_ALERT) oder 
nicht rückkehrfähigen (DEAD- 
END_ALERT) Alert handeln 
soll. Setzen Sie eines der in 
Klammern angegebenen Sym¬ 
bole ein. Parameter zwei ist ein 
Zeiger auf eine Zeichenkette, 
die den Alert-Text beinhaltet. In¬ 
nerhalb dieser Zeichenkette er¬ 
wartet Intuition aber noch ande¬ 
re Informationen (siehe auch Li- 
sting 39): 

Die drei ersten Bytes be¬ 
schreiben die X- und die Y-Posi- 




AABBCCCC 

CPU-TVap 

00000002 

Busfehier; extern erzeugtes Eingangssignal zeigt 
Hardwarefehier an 

00000003 

Adressierungsfehier; Word-Operand an ungerader 
Adresse 

00000004 

iliegale Anweisung; kein gültiger 68000-Befehl 

00000005 

Division durch Nuli; verbotene Division mit Divisor 
gieich Nuil 

00000006 

CHK-Befehi; Wert eines Datenregisters nicht im 
Bereich 

00000007 

TRAPV-Befehl; gesetztes Überiaufbit 

00000008 

Nutzung der Privileg-Befehle außerhalb des 
Supervisor-Modus 

00000009 

Trace-Modus; schrittweise Abarbeitung bei 
gesetztem Trace-Bit 

OOOOOOOA 

Line Emuiator; OPCode beginnt mit der Bitfoige 

1010 

OOOOOOOB 

Line Emuiator; OPCode beginnt mit der Bitfolge 

1111 


Tabelle 16. Diese Fehlermeldungen löst der Prozessor selbst 
aus. Sie sind nie vom Typ »Recoverable« 
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tion der nachfolgenden Textzei¬ 
le (siehe auch Kommentarzeile 
in Listing 37). Dabei interpretiert 
Intuition das erste Byte als das 
High-Byte der X-Position, das 
zweite Byte als deren LowByte 
und das dritte Byte als die Y- 
Position. 

Die maximalen Ausmaße ei¬ 
nes Alerts sind 640x256 Punk¬ 
te. Daher sind für die X-Position 
zwei Bytes und für die Y-Posi- 
tion nur ein Byte nötig. Es folgt, 
- mit einem Nullbyte abge¬ 
schlossen - der eigentliche 
Alert-Text. 

Hinter dem Text gibt ein ein¬ 
zelnes Byte an, ob ein weiterer 
Text folgen soll. Ist dieses Byte 
ungleich null, so folgt die Defini¬ 
tion einer weiteren Textzeile, 
wieder beginnend mit der Posi¬ 
tionsbeschreibung. Diese Se¬ 
quenz wiederholt sich so lange, 
bis hinter dem Alert-Text eine 
weitere Null folgt. 

Sie sehen, auch Intuition- 
Alerts sind einfach in eigene 
Programme einzubinden. Trotz¬ 
dem sollten Sie sparsam damit 
umgehen, um den ohnehin 
schon Alert-geplagten Amiga- 
User nicht noch unnötig zu er¬ 
schrecken. 

Wie Alerts zählen auch Re- 
quester zu den Systemmeldun¬ 
gen. Sie sind jedoch durch die 
Möglichkeit der Montage meh¬ 
rerer Gadgets ungleich komfor¬ 
tabler. Man spricht eher von 


Im einfachsten Fall nehmen 
sie, wie etwa die Systemreque- 
ster, lediglich eine Ja-/Nein-Ent- 
scheidung entgegen. Aller¬ 
dings sind in Bezug auf Anwen¬ 
dungsgebiet und Leistung nach 
oben hin keine Grenzen ge¬ 
setzt. 

Beispiele hierfür sind die 
komfortablen Filerequester 
oder solche zum Einstellen der 
Bildschirmfarben in den be¬ 
kannten Malprogrammen. 

Man unterscheidet zwei Re- 
questerarten: »AutoRequester« 
und frei definierbare (»Cu- 
stom«-)Requester. Die letzteren 
könnte man wiederum in nor¬ 
male und in »DoubleMenu«- 
Requester untergliedern. 
Grundsätzlich weisen aber bei¬ 
de die gleiche Struktur auf. 

Der einzige Unterschied: ein 
DoubieMenu-Requester er¬ 
scheint nach einem Doppel- 
Klick mit der rechten Mausta¬ 
ste. Beginnen wir mit den Auto- 
Requestern. Hierzu sind kei¬ 
nerlei Vorbereitungen nötig, der 
Aufruf der Funktion AutoRe- 
quest(&w,&tt&pt,&nt,pf,nf,b,h) 

Tabelle 15. Die Ziffern unter »AA« geben an, wo der Fehler »CCCC« aufgetreten Ist öffnet einen Requester mit zwei 


Dialogfeldern. 

Dialogfeld 

Requester 


Die Gurus entschlüsselt 


AA 

SubSystem 

CCCC 

Fehler 

01 

Exec 

0000 

Checksum Prozessor 



0002 

Checksum Exec-Startadresse 



0003 

Checksum Library 



0004 

kein Speicher für Library 



0005 

Fehler in Speicher-Liste 



0006 

kein Speicher für Interrupt 



0007 

Zeigerfehier 



0008 

fehlerhafte Semaphore 



0009 

Versuch mehrfacher Speicherfreigabe 



OOOA 

Zeigerfehler bei Ausnahmebedingung 

02 

Graphics 

0001 

kein Speicher für Copper-Liste 



0002 

kein Speicher für Copperinstruction-Liste 



0003 

Copperliste voll 



0004 

fehlerhafte Copperliste 



0005 

kein Speicher für Kopf der Copper-Liste 



0006 

kein Speicher für »long frame« 



0007 

kein Speicher für »short frame« 



0008 

kein Speicher für Fill-Rekursion 



0009 

kein Speicher für Textausgabe 



OOOA 

kein Speicher für BitMap 



OOOB 

fehlerhafte Angabe für Speicherbereich 



0030 

konnte kein ViewPort einrichten 



1234 

Bereich für Zwischenspeicher belegt 

03 

Layers 

0001 

kein Speicher für Layer 

04 

Intuition 

0000 

kein oder unbekannter Gadgettyp 



0001 

Gadgetfehler 



0002 

kein Speicher für Port 



0003 

kein Speicher für Darstellung des Menüs 



0004 

kein Speicher für Darstellung Untermenü 



0005 

kein Speicher für Menü-Titelzeile 



0006 

falsche Position der Titelzeile 



0007 

kein Speicher für Screen 



0008 

kein Speicher für RastPort 



0009 

kein oder unbekannter Screentyp 



OOOA 

kein Speicher für Gadget 



OOOB 

kein Speicher für Window 



OOOC 

falscher Systemstatus 



OOOD 

ungültige IDCMP-Message 



OOOE 

Überlauf des Messagepuffers 



OOOF 

kein Speicher für Console-Device 

05 

Math 



06 

CList 



07 

DOS 

0001 

kein Speicher für Start 



0002 

Task nicht beendet 



0003 

Packet fehlerhaft 



0004 

unerwartete oder fehlerhafte Daten 



0005 

Zeigerfehler 



0006 

Fehler in Block 



0007 

Fehler in BitMap 



0008 

Versuch mehrfacher Key-Freigabe 



0009 

Checksum-Fehler 



OOOA 

Disk-Fehler 



OOOB 

Key außerhalb des Bereichs 



OOOC 

fehlerhafte Überlagerung 

08 

RAM 

0001 

Fehler in Speicher-Liste 

09 

Icon 



OA 

Expansion 

0001 

Hard- oder Softwarefehler bei Erweiterungen 

10 

Audio 



11 

Console 



12 

Gameport 



13 

Keyboard 



14 

Trackdisk 

0001 

Fehler beim Suchen auf Diskette 



0002 

Timerimpuls fehlerhaft 

15 

Timer 

0001 

Zugriffversuch fehlerhaft 



0002 

Schwankungen der Netzfrequenz 

20 

CIA 



21 

Disk 

0001 

fehlerhaftes DiskChange-Signal 



0002 

fehlerhaftes oder fehlendes Laufwerk 

22 

Mise 



30 

Bootstrap 

0001 

Boot-Fehler 

31 

Workbench 



32 

Diskeopy 
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/* 

\\ lAlert.c - demonstriert DlspiayAlertO 
*/ 

#lnclude 'TOOL.h' 

BYTE AlertText[]=( 

/«X-hi,lo, Y, Text in Hochkorama = mit 0 abgeschlossen, 
weiter? (1/0) */ 

0,i40, 20, 'Keine Panik, dies ist ein Recovery-Alertl1, 
0,190, 45, 7/ Klick //', 1 , 

0,175, 52, '\\X/ \\X/*, 0 

]J 

VOID raalnO 

I 

if(!(OpenLlb()))( 

DisplayAlert(REC0VERY_ALERT,&AlertText[01,70)5 

CloseLlbOj 



Listing 37. Kurz und bündig: Intuition-Alerts mit 
DispiayAiertQ 


/» 

\\ AReq.c - demonstriert den Aufruf eines AutoRequeaters 
V 

#include 'TOOL.h' 
struct IntulText RT[33«{ 

2,0,JAMl,15,5,NULL,(UBnE »)'Bildschirm lÖ8Chen?*,NULL, 

3,0,JAM1, 6,4,NULL,(ÜBYTE »)' Ja *,NULL, 

2,0,JAM1, 6,4,NULL,(UBYTE *}"Nein',MULL 

Ij 

VOID mainO 
[ 

lf(l(OpenLib()))( 

if(AutoReque8t(mjU,8iRT[0],&RT[l],iRT[2],VANILUKEY, 0,200,50)) 
putchar(12)} /* Bildschirm löschen */ 

CloseLibO; 



Listing 38. Die Funktion AutoRequestQ öffnet einfache 
Requester, die eine Ja-/Nein<Entscheldung entgegen 
nehmen können 


struct Requester 

I 

struct Requester "OlderRequest; 

SHORT LeftEdge, TopEdge; 

SHORT Width, Helght; 

SHORT RelLeft, RelTopj 
struct Gadget *ReqGadget; 
struct Border »ReqBorderj 
struct IntulText *ReqText; 

USHORT Flags; 

UBYTE BackFill; 
struct Layer »ReqLayer; 

UBYTE ReqPadl[32]j 
struct BltMap »ImageBMapj 
struct Window »RWindow; 

UBYTE ReqPad2[36]; 

Jj 

Listing 39. Komfortablere Requester mit der 
Requester-Struktur 


beschrifteten Gadgets und ei¬ 
nem Titeltext. Die Parameter: 

w Ist ein Zeiger auf eine 
Window-Struktur, Intuition legt 
beim Öffnen des Requester- 
windows die angegebene 
Struktur zugrunde. Entspre¬ 
chend erscheint der dort ange¬ 


gebene Titel auch als Window¬ 
titel im Requester. Geben Sie 
NULL als Zeiger an, greift Intui¬ 
tion auf die Struktur der 
Systemrequester-Windows zu¬ 
rück. Wir erhalten dann »Sy¬ 
stem Request« als Windowtitel 
(Listing 38). 


Die folgenden drei Parameter 
sind Adressen von IntuiText- 
Strukturen. Dabei bedeutet: 

tt die Requesterüberschrift; 

pt der Positiv-Text (im linken 
Gadget) und 

nt der Negativ-Text (im rech¬ 
ten Gadget). Weitere Parameter 
sind pf und nf die IDCMP- 
Flags, die die Wahl des Positiv¬ 
oder Negativ-Gadgets erset¬ 
zen, sowie b und h die Breite 
und die Höhe des Requesters. 

Der Rückgabewert der Funk¬ 
tion unterscheidet sich nur 
dann von Null, wenn Intuition 
die Wahl des Positiv-Gadgets 
oder, über den Message-Port, 
das Positiv-Flag registriert hat. 

Sehen wir uns Listing 40 et¬ 
was genauer an. Die notwendi¬ 
gen IntuiText-Strukturen für die 
Texte intialisieren wir in einem 
Array. In der vereinbarten Rei¬ 
genfolge dienen sie beim Aufruf 
als Parameter. 

Da wir bei Flags »VANILLA- 
KEY« gesetzt haben, kommt ein 
beliebiger Tastendruck der An¬ 
wahl des Positiv-Gadgets 
gleich. 

unvergleichlich 

flexibei 

Eine positive Entscheidung 
erfüllt die Bedingung der if-An- 
weisung - der Rückgabewert 
von AutoRequestQ ist ungleich 
null > die Funktion putcharQ 
löscht den Bildschirm. 

AutoRequestQ ruft eine 
Funktion namens BuildSysRe- 
quest(w,&tt,&pt,&nt,f,b,h) auf. 
Die Parameter sind dabei, bis 
auf »f«, die gleichen wie schon 
bei AutoRequestQ besprochen. 

BuildSysRequestQ installiert 
einen Requester mit den bei¬ 
den Gadgets, kehrt aber mit ei¬ 
nem Windowpointer zurück. 
Als IDCMP-Flags dieses Win¬ 
dows ist der beim Funktionsauf¬ 
ruf als Parameter »f« übergebe¬ 
ne Wert zu finden. 

Die Abfrage der Gadgets 
müssen Sie selbst überneh¬ 
men. Die Funktion FreeSysRe- 
quest(&win) schließt solche Re¬ 
quester. Als Parameter verlangt 
sie die von BuildSysRequestQ 
gelieferte Adresse. 

Möchte man in seinen Pro¬ 
grammen komfortable, fast me¬ 
nüähnliche Requester, mit vie¬ 
len Auswahlmöglichkeiten an¬ 
bieten, muß man nur ein klein 
wenig tiefer ins System hinab¬ 
steigen und sich mit der Reque¬ 
ster-Struktur (Listing 39) befas¬ 
sen. 

Packen wir’s an: der Zeiger 
»OlderRequester« interessiert 
nur Intuition. Er verweist auf 
den zuvor geöffneten Reque¬ 
ster. LeftEdge, TopEdge, Width 
und Height stehen für die Posi¬ 


tion und die Dimension des 
neuen Requesters. 

Wenn das Flag »POINTREL« 
(siehe unten) gesetzt ist, er¬ 
scheint ein DoubleMenu-Re- 
quester relativ zur Mausposi- 
tion. »RelLeft« und »RelTop« 
enthalten die entsprechenden 
Offsetwerte. »ReqGadget« ist 
die Adresse des ersten Gad¬ 
gets der Gadgetliste. »ReqBor- 
der« verweist auf die Border- 
struktur des Requesterrah- 
mens. Geben Sie NULL an, 
wenn Sie auf eine Umrandung 
verzichten wollen. »ReqText« 
enthält die Adresse der Intui- 
Text-Struktur mit dem Reque- 
stertext. 

Auch Requester kann man 
über Flags beeinflussen: 

»POINTREL« Ein Double Me- 
nu-Requester erscheint relativ 
zur Mausposition. 

»PREDRAWN« Ist nur bei der 
Verwendung einer eigenen Bit- 
Map (ImageBMap) nötig. 

»NOISYREQ« Ist ein Reque¬ 
ster aktiv, blockiert Intuition alle 
Nachrichten die dieses nicht 
betreffen. Mit gesetztem NOI- 
SYREQ-Flag, l^nn man nach 
wie vor Tastatur und Maus über 
den Message-Port kontrollie¬ 
ren. 

Die restlichen Flags setzt 
und löscht Intuition selbst. Hier 
die wichtigsten: 

»REQOFFWINDOW« Ein Re- 
quester-Gadget befindet sich 
zumindest teilweise außerhalb 
des Windows. 

»REQACnVE« Sendet Intui¬ 
tion bei einem aktiven Reque¬ 
ster. 

»SYSREQUEST« Es handelt 
sich um einen System-Reque- 
ster. Die Variable BackFill der 
Requester-Struktur enthält die 
Hintergrundfarbe des Reque¬ 
sters. 

Von den letzten fünf Varia¬ 
blen ist für uns, wenn über¬ 
haupt, nur noch »ImageBMap« 
interessant. Es handelt sich um 
einen Zeiger auf eine eigene 
BitMap. Falls Sie eine solche 
verwenden möchten, müssen 
Sie auch das Flag »PRE¬ 
DRAWN« setzen. 

Natürlich haben wir in Tool.h 
auch eine Funktion, die zur ein¬ 
fachen Erzeugung eines Re¬ 
questers dient. Wir nutzen dar¬ 
in nur die l^mponenten bis ein¬ 
schließlich BackFill. 

Die Funktion GetRequest(&r, 
&w,l,t,w,h,rl,rt,&g,&b,&i,f,b,T) in 
Listing 1, öffnet einen beliebi¬ 
gen Requester. Die Parameter 
sind nahezu identisch mit der 
Requester-Struktur: 

r ist die Adresse einer 
Requester-Struktur; 

w die Adresse des Windows 
dem die Requester-Struktur zu¬ 
geordnet sein soll; 
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I,t,w,h,rl,rt die Positions- und 
Dimensionsangaben LeftEdge, 
TopEdge, Widht, Height, Rel- 
Left und RelTop: 

g ein Zeiger auf das erste Ele¬ 
ment der Gadgetliste; 

b ein Zeiger auf eine Border- 
struktur; 

i ein Zeiger auf eine IntuiText- 
Struktur für ReqText; 
f sind die Flags und 
b steht für BackFill. 

Der letzte Parameter - T - 
steht für den Requester-Typ. 
Geben Sie »DMREQ« für 
DoubleMenu-Requester und 
»REQ« für normale Requester 
an. Die beiden Symbole sind in 
ebenfalls in Tool.h definiert. 

Wie funktioniert nun GetRe- 
questO? Zu Beginn initialisiert 
die Funktion InitRequesterQ die 
gesamte Struktur mit NULL, da 
wir ja nicht alle tomponenten 
mit Werten versorgen. Nach 
der Zuweisung der Parameter, 
rufen wir, falls es sich um einen 
DoubleMenu-Requester han¬ 
delt, die Funktion SetDMRe- 
quest(&w,&r) auf. Zwei Pointer 
als Parameter verweisen auf 
die betreffende Window-Struk¬ 
tur und auf die Requester- 
Struktur. Die Funktion läßt den 
Requester aber nicht erschei¬ 
nen, dies geschieht erst nach 
einem Doppelklick. 

An dieser Steile gleich das 
Gegenstück zu SetDMRe- 
questQ: 

ClearDMRequest(&win) 
löscht den DoubleMenu-Re¬ 
quester aus der Liste des ange¬ 
gebenen Windows (nicht vom 
Bildschirm), so daß eine Akti¬ 
vierung per Doppelklick nicht 
mehr möglich ist. 

Beide Funktionen liefert 


/• 

\\ DKReq.c - Positionierung des 
DoubleMenu-Requesters 
*/ 

#inolude TOOL-h' 

#define RHO 160 
#define RBR 250 
#deflne OHO 15 
#define GBR 50 
#deflne GS (OxFFFF/100) 

struct Window »winj 
struct Image imagej 
struct Proplnfo PInfo=( 

FREEVERTl FREEHORIZl AUTOKNOB,0,( 

); 

SHORT Rposn=( 

0,0, RBR-5,0, RBR-5, RHO-3.0, RH0-; 

i; 

SHORT Gpos[]=( 

0,0,GBR,0,GBR,GHO,0,GHO,0,0 

1 ; 

Struct Border RRand=[ 

2,l,2,0,JAHl,5,Mipos[0],NULL 

1 ; 

struct Border GRand=[ 

-l,-l,2,0,JAMl,5,&Gpos[0],NULL 

struct IntulText RText=[ 



»TRUE«, wenn sie korrekt arbei¬ 
ten konnten und im anderen 
Fall -FALSE«. 

Durch die Angabe von 
»REQ« als letzten Parameter 
der Funktion GetRequestO 
stellt die Funktion Re- 
quest(&r,&w), in der letzten Zei¬ 
le von Listing 3, den gewünsch¬ 
ten Requester sofort auf dem 
Bildschirm dar. 

Die Parameter von RequestQ 
sind die gleichen wie bei 
SetDMRequestQ, sie sind ledig¬ 
lich in der Reihenfolge ver¬ 
tauscht. Da GetRequestO 
Funktionen selbst aufruft, sind 
Fehler durch Verwechslung der 
Parameter ausgeschlossen. 

Ein Requester kann auf zwei 
Arten wieder geschlossen, das 
heißt vom Bildschirm gelöscht 
werden: a) über den Aufruf der 
Funktion EndRequest(&r,&w) 
mit den Adressen des Reque- 
sters und des Windows als Pa¬ 
rameter; b) durch die Betäti¬ 
gung eines ENDGADGETs (sie¬ 
he auch unter Gadgets). 

Requester 
und Gadgets 

Unsere Tool.h-Funktion Get- 
GadgetO erkennt selbständig, 
ob es sich um Window- oder um 
Requester-Gadgets handelt. 
Die Verkettung der Window- 
Gadgets erfolgt problemlos 
über AddGadgetQ- Requester- 
Gadgets müssen wir »von 
Hand« verketten. Geben Sie 
hierzu anstelle des Window- 
Zeigers die Adresse der jeweils 
nächsten Gadget-Struktur an. 
Der Aufruf eines Requesters 
mit drei Gadgets könnte dem¬ 
nach wie folgt aussehen; 


Bildschinna über 


■,GS,GS,0,0,0,0,0,0 


.0,0 


2,0,JAM1,15,10,NULL,(UBYTE ViewOffset einstellen!',NULL 

ij 

struct IntuiText SText=l 

2,0,JAM1,5,3,NULL,(UBYTE *)'SLEEP',NULL 

1 ; 

struct IntuiText EText={ 

3,0,JAM1,9,3,NULL,(UBYTE •)'QUIT'.NULL 

1 ; 

VOID sleepO 

{/• warten auf IntulHessage der Klasse REQSET */ 

ULONG dass; 

do{ 

Walt(l< <win->UserPort->iiip_SigBlt); 

} while( (clas8=GetHes8age(win,0,0,0))! =RE(JSET); 


VOID tnalnO 
( 

struct Requester req; 

struct Gadget Pgad, Sgad, Egad; 

struct Preferences prefs; 

ULONG dass; 

USHORT code,id,booL_actlvatlc.n8=RELVERIFYl GADGIMMEDIATEl 
ENGADGET; 

BOOL ende=0; 

if(0penLib()) exit(O); 

GetPref8(&pref8,slaeof(struct Preferences)); /* Preferences- 
Werte lesen */ 

PInfo.HorlzPot=GS»(prefs.VlewXOff8et+50); /• Start-Schieber¬ 

stellung X »/ 

PInfo.VertPot =GS»(pref3.VlewY0ff8et+25); /* Start-Schieber¬ 

stellung Y */ 

ModlfyIDCMP((win=ACTIVE_WIND0W),GADGETUPl MOUSEHOVEl REQSET);/* 
IDCMPFlaga »/ 

GetGadget(8cPgad,NULL,25,25,2OO,lOO,0,FOLLOWMOUSE, 

REQGADGETI PR0PGADGET,6image,NUU,NULL,8tPInfo,0); 
GetGadget(&Sgad,&Pgad, 25,135,GBR,GH0, GADGHCOHP, 
bod_activatlons, 

REQGADGETI BOOLGADOET,8iGRand,NULL,&SText,NUU,l); 
GetGadget{6Egad,&Sgad,175,135.GBR.CHO,GADGHCOHP,bool_activatlon8, 
REQGADGETI BOOLGADGET,&GRand,NULL,8cEText,NULL,2)5 
GetRequest(&req,wln,20,20,RBR,RHO,0,0,&Egad,8!RRand,8tRText, 
0,1,DHREQ); 
sleepO; 

while(N0T ende)[ 

Wait(l< <win->U8erPort->mp_SigBlt); 
class<GetMeseage(win,&code,8cid,0); 

lf(cla89==M0USEM0VE){/» Autoknob ln Proportlonal-Gadget 
wurde bewegt */ 

prefs.ViewX0ff8et=PInfo.HorizPot/GS-50; 
prefs.ViewYOffsetsPInfo.VertPot/GS-25; 
SetPrefs(&prefs,slzeof(struct Preference8),FALSE); 
whlle((dass=GetHessage(wln,icode,&ld,0))=»MOUSEHOVE); 

) 

if(clas3»:GAI>GETUP)[/* eines der beiden BooleanGadgets wurde 
gewählt */ 

switch(ld){ 

case 1:[ /» SLEEP-Gadget 

selektiert «/ 

SleepO; /• warten 

auf REQSET •/ 

break; 

1 

case 2:{ /• QUIT-Gadget 

selektiert */ 

erde=l; /* Schlelfenkriterlum 

erfüllen »/ 

break; 

} 

default: break; 

1 

] 

) 

ClearDMRequest(wln); /* DoubleMenu-Requester 

streichen */ 

ModifyIDCHP(wln,0); 

CloseLlbO; 


Listing 40. DMReq öffnet einen DoubleMenu-Requester, in 
dem man Werte der Preferences-Struktur verändern kann 
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struct Preferences 


l 


/* Höhe des Zeichensatzes (8 oder 9) 


EHE FontHelght; 
in Pixel */ 

UBYTE PrinterPort; /* Printer an serieller oder paralleler 
Schnittstelle »/ 

ÜSHORT BaudRate; /» Ühertragungsgesohwindiglceit der RS-232 
(110-19200) */ 

struct tiraeval KeyRptSpeedj /• Tastenwiederhol- 

geschwindlgkelt */ 

struct timeval KeyRptDelayj /» Verzögerung bis zur ersten 
Wiederholung »/ 

struct tiraeval Doubleclick;/* Zeit zwischen 2 Klicks eines 
Doppel-Klicks »/ 

USHORT PointerMatrix[POINTERSIZE]; /* die Grafik des 
Maus-Pointers */ 

BYTE XOffset,yOffaetj /» die Position des >>heißen Punktes< 

< im Pointer »/ 

USHORT colorl7,colorl8,colorl9; /» Pointerfarben «/ 

USHORT PolnterTlcks; /* die >>Übersetzung< < des 

Hauepointers »/ 

USHORT color0,colorl,color2,oolor3; /* die 

Workbenchfarben •/ 

BYTE ViewXOffset.VlewYOffset; /* die Position des Bildes auf 
dem Monitor «/ 

WORD ViewInltX, VlewInitY; /» Initialisierungswerte 

des View »/ 

BOOL EnableCLI; /» CLI-Icon ein- oder 

ausgeschaltet */ 

USHORT PrlnterType; 

UBYTE PrlnterFllename[FILENAME_SIZE]; /» der Karne des 
Custom-Printere »/ 

USHORT PrintPltch; /» die Schriftart, z.B.: Bold, 

Pica, Italic »/ 

USHORT PrlntQuallty; /» die Qualität des Ausdrucks, z.B.: 

NLQ, Draft »/ 

USHORT PrlntSpaclng; /» Druck-Abstand */ 

UWORD PrintLeftHargln,PrintRlghtMargin; /* Rand beim Drucken»/ 
USHORT Prlntlmage; /» normaler oder reverser Ausdruck */ 

ÜSHORT PrintAspect; /* Ausdruck horizontal oder vertikal »/ 

USHORT PrlntShade; /» Art des Ausdrucks: S/W, Grautöne, Farben »/ 
WORD PrintThresholdj /* die Graustufe ^beirn Ausdruck */ 

USHORT PaperSize; /« die Papiergröße »/ 

UWORD PaperLength; /» die Länge des Papiers ln Zeilen gemessen «/ 
USHORT PaperType; /» Endlospapier oder Elnzelblätter »/ 

UBYTE SerRWBits; /* Read (High) oder Write(Low) Bits »/ 

UBYTE SerStopBufj /» Stopblts (H) und Puffergröße (L) »/ 


*/• 


UBYTE SerParShk; 

UBYTE LaceWB; 

UBYTE WorkName[PILENAHE_SIZE]; 
für Druckername »/ 

BYTE RowSizeChange; 

BYTE ColumnSizeChange; 

BYTE padding[l4]; 

-ende VERSION 2.1- 

UWORD PrintFlags,PrlntMaxWldth,PrlntMaxHeight; 
weiter Einstell- »/ 


/* Parlty (H) und Shake (L) »/ 
/* Fllmmer-Workbench an/aus */ 
/* Zwischenspeicher 


'*/ 


/• 


UBYTE PrintDeneity,PrintXOffset; 
Printer »/ 

UWORD wb_Width,wb_Height,wb_Depth; 
Workbench «/ 

UBYTE ext_slze; 

Erweiterungen •/ 


/* mögllchkelten für 


/» Breite, Höhe, Tiefe der 


/» die Größe eventueller 


Listing 41. Die Preferences-Struktur enthält alle 
Grundeinstellungen Ihrer Workbench 


GetGadget(&Gad3, 

NULL, ... 

GetGadget(&Gad2, 

&Gad3, ... 

GetGadget(&Gadl, 

&Gad2, ... 

GetRequest(... & 

Gadl, ... 

Nur die wesentlichen Para¬ 
meter sind aufgeführt. Die Gad- 
get-Liste ist von unten nach 
oben aufgebaut, da bei der De¬ 
finition beispielsweise des Gad- 
gets Gad2, das nachfolgende 
Gadget, also Gad3, schon be¬ 
kannt sein muB. 

Der Parameter in GetRe- 
questO verweist auf das zuletzt 
definierte Gadget. Dies ist das 
erste Glied der Strukturkette. 
Die Kette endet bei GadS, mit 
dem Verweis NULL als Folge- 
gadget. Ein Beispiel für die De¬ 
finition von Requester-Gadgets 
finden Sie in Listing 40, welches 
wir nun etwas genauer unter die 
Lupe nehmen wollen. 

DMReq startet einen Double- 
Menu-Requester. Nach dem 
Aufruf des fertig übersetzten 
Programms (RUN DMReq) ge¬ 
schieht anfangs nichts. Sie erin¬ 
nern sich, ein DoubleMenu-Re- 
quester öffnet sich erst nach ei¬ 
nem Doppelklick mit der rech¬ 
ten Maustaste. 

Ist dies geschehen, kann 
man in einem zweidimensiona¬ 
len Proportional-Gadgetdie Po¬ 
stion des Bildes auf dem Moni¬ 
tor einstellen. Darüber hinaus 
stehen zwei weitere Gadgets 
zur Wahl, mit denen man ent¬ 
scheidet, ob man die Position 
später nocheinmal verändern 
möchte (SLEEP) oder nicht 
(OUIT). 

Die Definition von Symbolen 
und die Initialisierung von 
Strukturen bilden zusammen 
fast das erste Drittel des ge¬ 
samten Quellcodes. Den Rest 
teilen sich zwei Funktionen. 

Die erste davon, sleepQ, be¬ 
steht nur aus einer einzigen 
Schleife, in der wir den Messa¬ 
ge-Port überwachen, bis eine 
Nachricht der Klasse REQSET 
ansteht. Die andere ist die 
Hauptfunktion mainQ. 

Nach den notwendigen Ver¬ 
einbarungen und dem Öffnen 
der Libraries liest die Intuition- 
Funktion GetPrefsO die Prefe¬ 
rences-Struktur (Listing 41) aus. 
Diese in Intuition.h definierte 
Struktur enthält alle mit dem 
Workbenchprogramm Prefe¬ 
rences eingestellten Werte. 

Die Offsetwerte, die man die¬ 
ser l^pie entnehmen kann, bil¬ 
den nach einer kleinen Anpas¬ 
sung die Startposition des 
»Schiebers« im Proportional- 
Gadget. 

ModifylDCMPO setzt eine 


Zeile darunter die notwendigen 
IDCMP-Flags im CLI-Window. 
Normalerweise sind ja dort kei¬ 
ne IDCMP-Flags gesetzt. 

Unser Requestersoll mit drei 
Gadgets ausgestattet sein. Die 
Tool.h Funktion GetGadgetQ er¬ 
ledigt das für uns. Beachten Sie 
die Verkettung durch die Anga¬ 
be des Fblgegadgets als zwei¬ 
ten Parameter im Funktionsauf¬ 
ruf. 

Die Angabe von »DMREQ« 
als letzten Parameter von Get- 


RequestQ deklariert das neue 
Dialogfeld als DoubieMenu-Re- 
quester. Unser Programm 
»schläft« in sieepQ bis der An¬ 
wender den Requester akti¬ 
viert. Intuition sendet dann nur 
noch Nachrichten die den Re¬ 
quester direkt betreffen. 

GetMessageO empfängt und 
beantwortet sie alle, im Rumpf 
der sich anschließenden while- 
Schleife. 

Registriert Intuition die Betä¬ 
tigung des Proportional-Gad- 


gets, empfangen wir »MOUSE- 
MOVE«. In diesem Fall schreibt 
SetPreferencesO die veränder¬ 
ten Werte zurück. Auch hierzu 
gleich mehr. 

Empfangen wir die Nachricht 
»GADGETUP«, unterscheidet 
eine switch-Anweisung zwi¬ 
schen den beiden BOOL-Gad- 
gfets. 

Je nach Gadget-ID schicken 
wir das Programm wieder 
schlafen oder verlassen die 
Schleife um es zu beenden. 

Nur noch wenige Intuition- 
Funktionen sind zu bespre¬ 
chen, mit den Requestern ha¬ 
ben wir das letzte große Intui¬ 
tion-Element beleuchtet. Damit 
kann man einiges anfangen! 
Versuchen Sie sich doch ein¬ 
mal an folgendem Problem: 

Realisieren Sie einen »Ta¬ 
schenrechner« als Requester. 
Bauen Sie soviele Funktionen 
ein, wie ihnen einfalten - die 
vier Grundrechenarten sollten 
es zumindest sein. Alles sollte 
über eine »Tastatur«, sprich 
Gadgets, zu bedienen sein. Ein 
String-Gadget dient als Display. 
Vielleicht simulieren Sie sogar 
Ihren eigenen Taschenrechner 
auf dem Amiga? 

Bei einer Fehleingabe, zum 
Beispiel der Division durch null, 
soll ein Alert den Anwender 
warnen. Eine Sicherheitsabfra¬ 
ge in Form eines System-Re- 
questers soll erscheinen, so¬ 
bald der Anwender das Pro¬ 
gramm verlassen möchte. 

Eine große Aufgabe, zugege¬ 
ben, aber Sie sollten sich den¬ 
noch etwas beeilen, denn wir 
behandeln jetzt gleich die noch 
fehlenden Intuition-Funktionen. 

Ihre Einstellun¬ 
gen: Preferences 

Befassen wir uns gleich, wie 
versprochen, mit den Funktio¬ 
nen GetPrefsO und SetPrefsQ- 
Die erste, hier nocheinmal der 
Aufruf: 

GetPrefs(&p,s); 

kopiert die Daten in den als er¬ 
sten Parameter angegebenen 
Bereich. Der zweite Parameter 
gibt die Größe des zu kopieren¬ 
den Bereichs an. Man braucht 
ja nicht immer die ganzen Infor¬ 
mationen, daher findet man die 
wichtigsten auch ganz vorne in 
der Struktur. In »DMReq.c« ver¬ 
langen wir dennoch die ganze 
Struktur und geben daher als 
ersten Parameter die Adresse 
einer Preferences-Struktur und 
als zweiten Parameter deren 
Größe an. 

Falls Sie die auf der System- 
Diskette gespeicherten Werte 
lesen möchten, wenden Sie 
GetDefPrefsO an. Die Parame- 
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C-Kurs 


/• 

w 
*/ 

#inolude 'TOOL.h* 


Klick.c - testet auf Doppelklick 


VOID oainO 
{ 

struct Window *win; 

ULONG olas3,S[2],M[2]; 

USHORT code=0j 
SHORT n=0; 

lf(!(OpenLlb()))( 

ModifyIDCMP((win=ACTIVE_WINDOW).MOUSEBUTTONS)j 
Win- > Flags'=RHBTRAP; 
while(codeIsMENUDOWN)( 

Wait(l< <win->UserPort->iap_SlgBlt); 
class°GetHessage(win,&code,0,0); 
if((olas8==M0USEBUTT0NS)&&(code==SELECTD0WN))( 
CurrentTime(iS[n],iM[n]); 
lf(n)l 

If(DoubleClick(S[0],M[0],S[1],M[1])) 
printf('Doubleclick l!!\n'); 
eise printf{'zu langsam (gahn)\n'); 


n=n70:l} 


l 


win->Flags'=RHBTEUP; 

ModlfyIDCMP(wln,0)5 

CloseLlb()j 


Listing 42. Klick.c zeigt wie man auf einen Doppelklick 
testet 


ter der beiden Funktionen sind 
gleich. 

SetPrefs(&p,s,flag), der Na¬ 
me deutet darauf hin, ist das 
Gegenstück zu den beiden zu¬ 
vor besprochenen Funktionen. 

Die beiden ersten Parameter 
sind wieder gleich. Der dritte 
bestimmt, ob die Werte dauer¬ 
haft auf Diskette (TRUE) oder 
nur im Speicher (FALSE) geän¬ 
dert werden sollen. 

Möchten Sie gerne wissen, 
ob Sie wieder einmal zu viel Zeit 
vor dem Amiga verbracht ha¬ 
ben, dann könnte Ihnen viel¬ 
leicht CurrentTimeO helfen: 
ULONG Sekunden, 
Mikrosekunden; 

CurrentTime(&Sekunden, 
SMikrosekunden); 

Sie erhalten die Systemzeit 
in Sekunden und Mikrosekun¬ 
den ab dem 01.01.1978. Natür¬ 
lich gibt es zur Ermittlung von 
Uhrzeit und Datum wesentlich 
nützlichere Funktionen. Mittels 
CurrentTimeO können Sie je¬ 
doch die notwendigen Parame¬ 
ter für 

ULONG S1,S2,M1,M2; 

BOOL ok; 

ok=DoubleClick(Sl,Ml,S2, 

M2); 

Die Parameter S1, Ml und 
S2,M2 sind die Systemzeiten 
zweier Mausklicks. Die Funk¬ 
tion prüft mittels der Zeitdiffe¬ 


renz und des eingestellten Wer¬ 
tes in Preferences, ob es sich 
um einen Doppelklick handelte. 
Wenn ja, liefert sie TRUE, wenn 
nicht FALSE. Listing 42 demon¬ 
striert den Test auf Doppelklick. 

Hier eine kurze Beschrei¬ 
bung: nachdem IDCMP- und 
Windowflags des gerade akti¬ 
ven (CLI-) Windows auf das Ar¬ 
beiten mit den beiden Mausta¬ 
sten vorbereitet sind, warten im 
der Hauptschleife auf MOUSE- 
BUTTONS. Registriert GetMes- 
sageQ im Feld Code der Messa¬ 
ge-Struktur einen Klick mit der 
rechten Maustaste, beenden 
wir das Programm, nach den 
entsprechenden Reinitialisie- 
rungen. Erreicht uns die Nach¬ 
richt der Betätigung der linken 
Taste schalten wir die Variable n 
von 0 auf 1 oder umgekehrt, 
falls sie schon den Wert 1 hat. 
Entsprechend des Wertes in n 
schreiben wir die Systemzeit in 
S[0] und M[0] oder in S[1] und 
M[1]. Immer wenn n den Wert 
eins hat, die Maustaste wurde 
dann zum zweiten Mal betätigt, 
testen wir auf Doppelklick. Da¬ 
mit sind wir am Ende unserer 
kleinen Übersicht zur Intuition 
angelangt. Natürlich kann die¬ 
se nicht vollständig sein. Sie 
sollten sie ausgiebig mit eige¬ 
nen Experimenten ergänzen. 

Wenn Sie die bisher bespro¬ 
chenen Gebiete Intuition und 
Grafik beherrschen, sind Sie si¬ 
cher auch in der Lage, gute Pro¬ 


gramme schreiben. Oft möchte 
man aber Daten auf Diskette si¬ 
chern und dieselben von Dis¬ 
kette lesen. Dazu ist es unter 
Umständen notwendig, in be¬ 
stimmte Verzeichnisse »hinab- 
zutauchen«. Verzeichnisse 
müssen gelistet werden. Eben¬ 
sowichtig ist die Pflege von Da¬ 
teien und Verzeichnissen. 

Von Daten 
und Disketten 

Die notwendigen Funktionen 
müssen wir uns natürlich nicht 
selbst erarbeiten, sie sind be¬ 
reits in der Systembibliothek 
von AmigaDOS enthalten. Die 
wichtigsten davon besprechen 
wir im Anschluß und erklären 
sie, - soweit nötig - an einem 
Beispiel. 

Voraussetzung für die Benut¬ 
zung der DOS-Routinen ist das 
Einbinden des speziellen Hea¬ 
derfiles »libraries/dos.h«. Dort 
sind unter anderem wichtige 
Strukturen für das Arbeiten mit 
Amiga-DOS definiert. Wir be¬ 
schäftigen uns besonders mit 
den folgenden: »FilelnfoBlock« 
und »InfoData«, definiert in 
dos.h, sowie FileHandle und Fi- 
leLock aus dosextens.h. Das 
Headerfile dosextens.h wird 
von dos.h automatisch einge¬ 


bunden, ist aber deshalb nicht 
weniger interessant. 

Das Öffnen des DOS-Libra- 
ries und die Initialisierung der 
globalen Variablen DosBase er¬ 
folgt, wie ganz zu Beginn er¬ 
wähnt, bereits im Startup-Pro- 
gramm. Natürlich ist es auch 
möglich, DosBase explizit in 
betonter Weise zu initialisie¬ 
ren. Enveitern Sie doch einfach 
die Tool.h-Funktionen Open- 
LibQ und CloseLibQ mit den 
Funktionen zum Öffnen und 
Schließen der DOS-Library. 

Beginnen wir mit den Funk¬ 
tionen, die mit der Adresse der 
FileHandle-Struktur arbeiten. 
Diese Struktur, wir bezeichnen 
den entsprechenden Pointer in 
den folgenden Funktionsaufru¬ 
fen der Einfachheit halber als 
»FH«, steht stellvertretend für 
eine offene Datei oder ein offe¬ 
nes Device. Die Funktion Open 
(name,modus) öffnet die Datei 
»name« und liefert einen Zeiger 
auf die FileHandle-Struktur: 
FH=Open(nanie,modus); 

Der Parameter modus kann 
hierbei einen der symbolischen 
Werte »MODE_NEWFILE« 
oder »MODE_OLDFILE« an¬ 
nehmen. Als Parameter name 
kann auch ein Device-Name 
dienen. Sie erinnern sich, zu 
Anfang haben wir mit der 
OpenQ-Funktion das Gerät 



FNr 

Bedeutung 

103 

kein freier Speicher 

105 

zu viele (mehr als 20) aktive CLI-Prozesse 

120 

Argumentenliste zu lang oder fehlerhaft 

121 

kein ausführbares Programm 

122 

Fehler in einem residenten Library 

201 

Verzeichnis fehlerhaft 

202 

Objekt ist bereits geöffnet 

203 

es existiert bereits ein Objekt mit diesem Namen 

204 

Verzeichnis nicht gefunden 

205 

File nicht gefunden 

206 

fehlerhafter Stream-Name 

207 

Objekt zu groß 

209 

unbekanntes (unmögliches) Kommando 

210 

fehlerhafter Dateiname 

211 

fehlerhafte FlleLock-Struktur 

212 

Objekt-Typ fehlerhaft 

213 

Diskettenerkennung negativ 

214 

Diskette ist schreibgeschützt 

215 

Umbenennung hier nicht möglich 

216 

Verzeichnis nicht leer 

217 

zu viele Levels (?) 

218 

Device nicht gefunden/eingebunden 

219 

feherhafte Positionsangabe 

220 

Kommentar zu lang 

221 

Diskette Ist voll 

222 

Objekt vor löschen geschützt 

223 

Objekt vor überschreiben geschützt 

224 

Objekt vor lesen geschützt 

225 

keine DOS-Diskette 

226 

keine Diskette im Laufwerk 

232 

keine weiteren Einträge bei ExNextQ 


Tabelle 17. Die Funktion loErrO liefert bei einem I/O-Fehler 
eine Nummer als Fehlermeldung 
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/» 

\\ TYPE.c - ein File als Text listen 

*/ 

#lnclude 'TOOL.h' 

VOID aain(argc,argv) 

SHORT arge; 

STRPTR argvn; 

( 

UBYTE »buffer; 

LONG l.size; 

if({argc!s2)l I (»argv[l]as'?'))( 

printf('!<c\033[3oAufruf:\033[0in*e Filename\n',7,argv[0]); 
exlt(O); 

) 

lf(buffer=GetFile(8rgv[l],8t3lze)){ 

prlntf('*c\033[4niliste %8 .. .\033[0m\n\n',12,argv[l]); 
for(i»0;l< slze; 1++) putohar(buffer[i]); 
FreeFlle(buffer,8lze); 

) 

eise prlntf(*<cKann Xs nicht llateni\n',7,argv[l]); 


Listlng 43. Eine Einsatzmöglichkeit für GetFileQ ** ein 
TYPE-Kommando 


/• 

\\ SavePlane.o - Speicherbereiche mittels PutFile() sichern 
*/ 

#Inelude TOOL.h' 

error(Heldung) 

STRPTR Meldung; 

( 

If(Meldung) prlntf('Fehler beim *al\n',Meldung); 
CloseLibO; 


VOID mainO 
( 

struct Window »win; 
atmet Soreen »sor; 

UBYTE »plane,»buffer; 

SHORT sw,sh,ww,Wh; 

LONG i,slsei 

if(OpenLlb()) error('öffnen der Llbs's'); 
scr »ACTIVE_SCREEN; 

plane«8cr->Ra8tPort. BitHap- > Planes [0]; 
sw «8cr->¥ldth; 
sh »scr->Height; 
wln »ACTIVILWINDOWj 
ww awln->Wldth; 

Wh =wln->Height; 

If(PutFlle('RAM:plane',plane,8W*8h/8)) error('Speichern'); 
lf((ww>50)46(wh>50)){ 

SlzeWindow(win,-20,-20); 

HoveWindow(wln,20,20); 

] 

lf(l(buffer=GetFlle( TlAMiplane', Salze))) error ('Laden'); 
for(l*0;i<slze;i-H-) plane[l]«buffer[l]; 
FreeFlle(buffer,8lze); 

RefreshWindowFrame(wln); 
error(O); 

1 

Listing 44. Die Tool.h-Funktion PutFileQ und Aktion: 
Speichern einer BitPlane 


»CON«: angesprochen und so 
auf einfachste Weise ein Sy¬ 
stem geöffnet. 

Im Fehlerfalle liefert OpenQ 
anstelle des Zeigers FH den 
Wert nuli. Welcher Fehler tat¬ 
sächlich auftrat, erfahren wir 
nach einem Aufruf der Funktion 
loErrO. Sie kehrt mit einer DOS- 
Fehiermeldung zurück. Es han¬ 
delt sich dabei um eine der in 


Tabelle 17 aufgelisteten Num¬ 
mern. 

Was kann man mit dem von 
OpenQ gelieferten Zeiger an¬ 
fangen? Man könnte beispiels¬ 
weise das File mit Close(FH) 
gleich wieder schließen, aber 
das ist wohl nicht Sinn der 
Übung... 

Die Daten eines Files lesen 
ist schon etwas sinnvoller. Re¬ 


ad(FH&puffer,(int)bytes) hilft 
uns dabei. Argument »puffer« 
verweist auf einen Speicherbe¬ 
reich von mindestens der Grö¬ 
ße »bytes«, denn dieser dritte 
Parameter gibt an, wieviele By¬ 
tes ReadO lesen soll. Der Rück¬ 
gabewert der Funktion ist die 
Anzahl der tatsächlich gelese¬ 
nen Bytes. Stimmt diese nicht 
mit der gewünschten Anzahl 
überein, ist das Dateiende er¬ 
reicht. Ein Wert gleich -1 deutet 
auf einen Fehler hin. 

Ähnlich arbeitet Write (FH, 
&puffer,(int)bytes). Eine Anzahl 
von »bytes« Bytes werden aus 
dem angegebenen Puffer in 
das entsprechende File ge¬ 
schrieben. Die Funktion liefert 
die Anzahl der tatsächlich ge¬ 
schriebenen Bytes. Im Fehler- 
faile liefert sie ebenfalls -1. 

Die besprochenen DOS- 
Routinen finden alle in ein 
Tool.h-Funktion Verwendung: 

STRPTR file; 

LONG size; 

UBYTE *buffer; 

buffer=GetFlle(file, 
&slze ); 

Der Name läßt erahnen: die 
Funktion lädt ein File namens 
»file« in den Arbeitsspeicher, 
Returnwert ist die Adresse ab 
der das File im Speicher zu fin¬ 
den ist oder, falls ein Fehler auf¬ 
trat null. 

Nach dem Aufruf enthält die 
Variable »size«, deren Adresse 
beim Aufruf der Funktion als 
Parameter dient, die Größe des 
Buffers. 

GetFileQ alloziert den zur 
Aufnahme des Files notwendi¬ 
gen Speicher selbst. Für die 
Freigabe des Speichers müs¬ 
sen wir selbst sorgen. Wir ha¬ 
ben dafür ein Macro definiert: 
FreeFile(buffer,size)j 

Parameter sind die Adresse 
des Buffers und die Größe des 
Files, also genau die Werte, die 
GetFileQ liefert. Listing 43 de¬ 
monstriert eine Einsatzmög¬ 
lichkeit für GetFileQ und Free- 
FileQ. Das kleine Programm 
listet ein File als Text. Nach 
Prüfung des Kommandopara¬ 
meters laden wir mit GetFileQ 
das gewünschte File. In der fol¬ 
genden for-Schleife gibt put- 
charQ jeweils ein Zeichen des 
Textes aus. Danach gibt FreeFi- 
leQ den Speicher wieder frei. 

Das Gegenstück zu GetFileQ 
finden Sie ebenfalls in Listing 1: 
Fehler=PutFile(file, 
buffer,size); 

Die Parameter sind: 
file - ein STRPTR auf den File¬ 
namen; 

buffer - die Adresse des Spei¬ 


cherbereichs, den die Funktion 
speichern soll und 
size, die Größe dieses Be¬ 
reichs. Falls PutFileQ den Be¬ 
reich nicht sichern konnte, lie¬ 
fert die Funktion den Wert 1, an¬ 
sonsten 0. 

Auch hier ein Beispiel. Star¬ 
ten Sie »SavePlane« (Listing 44) 
vbm CLI aus. Nach Ermittlung 
einiger Werte vom aktiven 
Screen und aktiven Window, 
speichern wir die unterste Bit- 
Plane in einem File namens 
»plane« Im RAM: ab. Anschlie¬ 
ßend verändern wir Größe und 
Position des CLI-Windows, ver¬ 
ändern also das Aussehen des 
Bildschirms. GetFileQ läd das 
File wieder. Wir kopieren den 
geladenen Bereich zurück in 
Plane[0]. Und siehe da: das 
Bild des Windows erscheint an 
der ursprünglichen Position. 

Die Haupt-Anwendung von 
GetFileQ und PutFileQ wird je¬ 
doch das Laden und - vielleicht 
nach einer Änderung - das 
Speichern von Files sein. 

Datenübertra¬ 
gung vereinfacht 

Möchte man eine bestimmte 
Position innerhaib eines Files 
lesen oder beschreiben, muß 
man den Schreib-Lesezeiger 
auf die betreffende Stelle posi¬ 
tionieren. Eine Aufgabe für 
Seek(FH,(int)bytes,{int)modus). 
Hiermit sind wir in der Lage, 
den Zeiger, von der mit »mo- 
dus« beschriebenen^ Position, 
»bytes« weit zu bewegen. Es 
existieren drei Modi: »OFF- 
SET_BEGINN!NG«, »OFF- 
SET_CURRENT« und »OFF- 
SET_END«. Um beispielswei¬ 
se ans Ende einer Datei zu ge¬ 
langen, könnte der Aufruf so 
aussehen: 

ap=Seek(FH,0, 

OFFSET_END); 

Die beiden Funktionen In- 
putQ und OutputQ liefern die 
Adresse der FileHandle-Struk- 
tur der Standardein- bezie¬ 
hungsweise -Ausgabedatei. 
Dies könnte zum Beispiel ein 
CLI-Task sein. Ob dies tatsäch¬ 
lich so ist, kann Islnteractive 
(FH) ermitteln. Die Funktion lie¬ 
fert »TRU E« wenn FH auf ein vir¬ 
tuelles Terminal verweist. Wait- 
ForChar(FH,t) erkennt, ob in ei¬ 
nem virtuellen Terminal, in der 
angegebenen Zeitt(in Mikrose¬ 
kunden), ein Zeichen eingege¬ 
ben wurde und kehrt bei positi¬ 
vem Ergebnis mit »TRUE« zu¬ 
rück. Man erhält das Zeichen 
mit ReadQ. 

Eine Datei läßt sich neben 
der FileHandle-Struktur auch 
über die FileLock-Struktur iden¬ 
tifizieren. Die letztere über- 
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struct InfoData ( 


LONG liJIumSoftErrors; 

/» Anzahl der registrierten 

Disketterfehler */ 


LOMG ld_UnitNiunber; 

!* Laufuerknummer. 0=DFO:, 1=DF1: usu. 

-1=RAM: »/ 


LONG ld_DlskState; /* Diskstatus (validatlng.valldated, 

wrlteprotect) */ 


LONG ItLNumBlocks; 

/* Anzahl der zur Verfügung 

stehenden Blöcke »/ 


LONG ld_NutnBlocksUsed; 

/• Anzahl der 

belegten Blöcke »/ 


LONG IdJytesPerBlock; 

/* Blocklftnge 

in Bytes */ 


LONG id_Di 8 kType; 

/» Disktype (’BADNO','DOS\0',’NDOS', 

'KICK') «/ 


BPTR id_VoluKieNode; 

/» Pointer auf Diskettenname 

(SCPL-String) */ 


LONG ld_InUse; 

/» wenn nicht ln 

Gebrauch == 0 »/ 

1 • 


Listing 45. Die InfoData-Struktur enthält viele interessante 

Informationen über die Diskette in einem Laufwerk 


struct FllelnfoBlock ( 

LONG flbJiskKey; 

/» Disk-Nummer (DOS-intem) •/ 

LONG flb_DirEntryType; 

/» Eintrag > 0 ? 

Verzeichnis ; Datei »/ 
char flb_FileN 0 jne[lO 8 ]; 

/» Filenamen, zur Zelt 

30 Zeichen »/ 

LONG flb_Protectlon;/* Protection-Bit - siehe CLI-Kommando 

Protect »/ 

LONG fib_EntryType; 

/* Type des Eintrag 

(DOS-intem) */ 

LONG fib_Slze; 

/» Größe einer Datei ln 

Bytes */ 

LONG fibJiumBlocks; 

/» Anzahl der belegten 

Blöcke •/ 

struct DateStanp fibJDate; 

/» LONG Days/Kinutes/ 

Ticks •/ 

char flb_Coimnent[116]; 

); 

/» Kommentar »/ 

Listing 46. Alle Daten eines Files oder eines Verzeichnisses 

sind in der FilelnfoBlock-Struktur zusammengefaßt 


wacht aber noch die Schreib¬ 
und Lesezugriffe auf diese 
Datei. Die Funktion Lock 
(name,(int)modus) ermittelt die 
Adresse der FileLock-Struktur 
(FL) der mit Namen angegebe¬ 
nen Datei und übergibt den ge¬ 
wünschten Zugriffsmodus. Die 

Angabe von »ACCESS_READ« 

als Modus ermöglicht den Le¬ 
sezugriff. Andere Tasks haben 
weiterhin Lesezugriff auf die 
genannte Datei. Einen solchen 
»Lock« kann man mit DupLock 
(FL) kopieren. Die Funktion lie¬ 
fert einen Zeiger auf die dupli¬ 
zierte FileLock-Struktur. Schrei¬ 
bend kann immer nur ein Task 
auf die Datei zugreifen. Modus 
»ACCESS_WRITE« sperrt alle 
anderen Schreibzugriffe. Lock 
liefert im Fehlerfalle.»FALSE«. 

Die Funktion UnLock(FL) gibt 
den mit LockQ erzeugten 
»Lock« wieder frei. Eine völlig 
neue FileLock-Struktur liefert 
CreateDir(name). Die Funktion 
erzeugt, wie das CLI-ftomman- 
do MakeDir, ein neues Unter¬ 
verzeichnis im aktuellen Disket¬ 
tenverzeichnis. Im Fehlerfalle 
ist der Returnwert gleich null. 


loErrQ gibt über einen aufge¬ 
tretenen Fehler näher Auskunft. 
CurrentDir(FL) erinnert eben¬ 
falls an ein CLI-Kommando. Die 
Funktion erklärt das mit FL be¬ 
schriebene Unterverzeichnis 
zum aktuellen Unterverzeich¬ 
nis. Als Rückgabewert erhalten 
wir die Adresse der FileLock- 
Struktur des vorherigen aktuel¬ 
len Unterverzeichnisses. Mit 
Hilfe dieser Routine ist es mög¬ 
lich, in einen Verzeichnisast 
des Dateisystems zu gelangen. 
Den umgekehrten Weg ermög¬ 
licht AmigaDOS mit der Funk¬ 
tion ParentDlr(FL), welche die 
FileLock-Struktur des überge¬ 
ordneten Verzeichnisses ermit¬ 
telt. Ist der Returnwert gleich 
null, befindet sich das mit FL 
beschriebene File (oder Ver¬ 
zeichnis) im Ursprungsver¬ 
zeichnis. 

Gut informiert 
mit DOS- 
Stmkturen 

Die Funktion lnfo(FL,ID) in¬ 
itialisiert die als zweiten Para¬ 


/» 

\\ Fileinfo,c - liest FilelnfoBlock aus 
*/ 

#include 'TOOL.h' 

struct FllelnfoBlock »Info; 
struct FileLock »lock; 

VOID error(Meiaung) 

STRPTR Meldung; 

[ 

lf{Meldung) printf('Keln !5sI?l\n',Heldung); 
if{lock) UnLock(lock); 

if(info) FreeMeiii{lnfo,sizeof(struct FllelnfoBlock)); 

exlt(O); 


VOID nialn(argc,argv) 

SHORT arge; 

STRPTR argvO; 

I 

if((argcl=2)11(»argv[l]==’)) 

error('Argument (Dlr-/Filename)'); 
if(I(lnfo=AllocHein(slzeof(struct FllelnfoBlock) ,HEMF_CLEAR))) 
error( 'Speicher'); 

if{!(look=(struct FlleLook*)Lock(argv[l],ACCESS_READ))) 
error{argv[l]); 
lf(!(Examlne(lock,info))) 
error("Info'); 

printf('Name : j8\n',lnfo->flb_FlleNaiiie); 
prlntfCType : '); 
info->fltiJ)lrEntryType>0 ? 
printf( 'VerzeichnlsXn') : 

prlntf('Datel\nGröße: ild Byte 8 \n",info->fib_Sl 2 e); 
error(O); 

) 

Listing 47. Fllelnfo gibt einige Werte der 
FilelnfoBlock-Struktur eines beliebigen Eintrags aus 


meter übergebene InfoData- 
Struktur (Listing 45). Diese ent¬ 
hält interessante Informationen 
über die Diskette auf der sich 
das Fite (oder Verzeichnis) der 
angegebenen FileLock-Struk¬ 
tur befindet. 

Beachten Sie hierbei, daß die 
InfoData-Struktur im Speicher 
ab einer Langwort-Adresse be¬ 
ginnen muß. Reservieren Sie 
am besten den notwendigen 
Speicherplatz mit AtlocMernQ. 
da diese Funktion in jedem Fall 
einen Speicherbereich, begin¬ 
nend ab einem Langwort, allo- 
ziert (siehe auch Listing 47). 

Die Tool.h-Funktion GetLWQ 
zeigt die Vorgehensweise. Sie 
ermittelt das aktuelle Laufwerk 
und liefert die folgenden Werte: 

-l=Fehler 

0=RAM: 

1=DF0: 

2=DF1: etc. 

Probleme beim Auslesen be¬ 
reitet höchstens der »BCPL«- 
Pointer (BPTR). Rechnen Sie 
ihn mit dem in dos.h definierten 
Macro BADDR(BPTR) in einen 
normalen C-Pointer um. Neben 
BPTR begegnen Sie im Amiga¬ 
DOS immer wieder dem Daten¬ 
typ BSTR. Es handelt sich um 
BCPL-Strings. Das erste Byte 
eines BSTR beinhaltet die Län¬ 
ge des nicht nullterminierten 
Strings. Hier ein Beispiel für 


den String »SYS« aus den 
»Rom l^rnal Reference Ma¬ 
nual« Seite D-169: 

s[0]=3 s[l]=S s[2]= 
y s[3]=S 

AmigaDOS informiert nach 
Wunsch auch über ein Ver¬ 
zeichnis oder sogar über ein 
einzelnes File. Diese speziellen 
Informationen sind in der File 
InfoBlock-Struktur vereint. Um 
sie auszulesen steht uns die 
Funktion Examine(FL,FIB) zur 
Verfügung. 

Funktionell entspricht Exami- 
neO der Funktion InfoO- Natür¬ 
lich initialisiert ExamineQ nicht 
die InfoData-Struktur, sondern 
die FilelnfoBlock-Struktur (Li¬ 
sting 46), auf die wir mittels des 
als zweiten Parameter überge¬ 
benen Zeigers verweisen. Auch 
für diese Struktur reservieren 
wir den notwendigen Speicher¬ 
bereich zur Sicherheit mit Al- 
locMemO. 

Wie Sie ihr entnehmen kön¬ 
nen, sind darin wertvolle Infor¬ 
mationen verborgen. Daher soll 
an dieser Stelle ein Beispielpro¬ 
gramm das Beschriebene ver¬ 
deutlichen. Listing 47 demon¬ 
striert die Handhabung der 
FilelnfoBlock-Struktur. 

Wegen der Ähnlichkeit der 
Funktionen InfoO und Exami- 
neO können Sie es ohne großen 
Aufwand zum Auslesen der In- 
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/* 

W Aufrufe der TOOL.h-Funktion ReadDir() 
*/ 

#include TOOL.h' 


SHORT Einträge,Flags; 

UBYTE Nafflen))Ä50))0))ÄFLEN))0; 

.LONG Size))Ä50))0; 

/» maximal 50 Einträge, Files und Dlrectories, lesen und 
im Array Namen ablegen, Filelängen in Slze ablegen: */ 
Einträge=ReadDlr{*DFO:',50,FILES))öDIRS,Namen,Slze); 

/* nur Unterveraelchnlsse lesen, ohne Files, ohne Slze */ 
Elnträge=ReadDlr( 'DFl:' ,20,DIRS,Namen,0); 

/* nur Files lesen, ohne Unterverzelehnlsse, mit Filegrööe »/ 
Einträge=ReadDir( 'SYS:' ,30, FILES,Namen,Size); 

]' 

Listing 48. Einige Beispielaufrufe der ReadDIrQ-Funktlon 


/* 

\\ DIR - Kommando mit der TOOL.h-Funktion ReadDir() 

*/ 

#include TOOL.h' 

VOID main(argc,argv) 

SHORT arge; 

STRPTR argv))i))Ü; 

( 

SHORT l,Eintr,Flag8; 

UBYTE Namen})Ä50))0))ÄFLEN))0; 

LONG Size))Ä5O))0; 

ElntrxReadDir(argv))il))0,50,FILES)}ftDIRS,Namen,Slze); 

lf(Elntr>»0)( 

for(l=0;i<Elntr;l++)( 

lf(Slze))Äl) )0<0) prlntf('\033) )Ä’;^*8\033) )A0m\n',Nainen) )Ä1))0); 
eise printf('X8\r\t\t\t\titd\n",Namen) )Äi) )0,Slze) )ii) )0) j 
} 

) 

eise prlntf('tcKann Ss nicht ll8tenl\n',7,argv))Äl))0); 

) 

Listing 49. Ein DIR-Kommando, superkurz dank Tool.h 


foData-Struktur umschreiben. 
Fllelnfo (Listing 47) erwartet 
beim Aufruf einen File- oder 
Verzeichnis-Namen als ifem- 
mandoparameter. Der vollstän¬ 
dige Name - den Unterschied 
bemerken Sie zum Beispiel 
beim Aufruf mit »DFO;« als Ar¬ 
gument - und der Typ des Ein¬ 
trags werden gelistet. Handelt 
es sich um eine Datei, so gibt 
das Programm noch deren Grö¬ 
ße in Bytes aus. Filelnfo.c ist re¬ 
lativ kurz und auch einfach auf¬ 
gebaut, so daß wir auf eine wei¬ 
tere Besprechung verzichten 
können. 

Als weiteres Beispiel sei die 
Exists(filename) aufgeführt. 
Diese Funktion prüft, ob ein 
Eintrag vorhanden ist. Ist der 
Returnwert kleiner 0, so handelt 
es sich bei dem als Parameter 
mitgegebenen Eintrag um ein 
Verzeichnis. Ein Returnwert 
größer 0 deutet auf ein File hin. 
Der Wert entspricht in diesem 
Fall der Größe des Files in Byte. 
Im Fehlerfalle liefert ExistsQ 
den Wert 0. Sie finden die Funk¬ 
tion in Tool.h unter DOS-Tools 
definiert. 

Eine weitere sehr interessan¬ 
te Funktion ist ExNext(FL,FIB). 
Sie ermöglicht in Zusammenar¬ 
beit mit ExamineO die Untersu¬ 
chung eines kompletten Ver¬ 
zeichnisses. Gehen Sie wie 
folgt vor: zuerst erfolgt der Auf¬ 
ruf von ExamineO dem Lock 
des gewünschten Verzeichnis¬ 
ses. Zeiger auf FileLock- und 
neu erstellte FilelnfoBlock- 
Struktur übergeben Sie Ex- 
NextO. Bei der Rückkehr der 
Funktion sind beide Parameter 
auf den ersten beziehungswei¬ 
se nächsten Eintrag im Ver¬ 
zeichnis ausgerichtet. 

Untersuchen Sie den Eintrag 
anhand der FilelnfoBlock- 
Struktur, geben Sie eventuell 
Namen und Größe auf den Bild¬ 
schirm aus, etc... 

Rufen Sie ExNextO nun so¬ 
lange auf, bis keine Einträge 
mehrvorllegen. Der Returnwert 
der Funktion ist dann gleich 
null. Aber Vorsicht, auch wenn 
ein Fehler auftrat, liefert Ex- 
NextO Null. 

Klarheit verschafft wieder 
loErrO- Ist der letzte Eintrag er¬ 
reicht, lautet die loErrO- 
Fehlermeldung 
»ERROR_NO_MORE_EN- 
TRIES«. 

Directory 
ohne Probleme 

Eine »klassische« Anwen¬ 
dung des geschilderten Ab¬ 
laufs ist das DIR-Itommando, 
wie in Tool.h definiert. Wir soll¬ 
ten ReadDirO (Listing 1 ) etwas 


genauer beleuchten. Zuerst der 
Aufruf: 

STRPTR d; 

USHORT a; 

SHORT e,f; 

UBYTE n[N][FLEN]; 

LONG s[N]j 

e=ReadDir(d,a,f,n,s); 

Beginnen wir von vorne: 

e - der Returnwert - ent¬ 
spricht der Anzahl der gelese¬ 
nen Einträge, im Fehlerfalle je¬ 
doch -1. 

Der erste Parameter - d - ist 
ein Pointer auf den Namen des 
zu listenden Verzeichnisses. 
Geben Sie hier NULL an, liest 
ReadDir das aktuelle Verzeich¬ 
nis. 

Parameter a ist die maximale 
Anzahl der zu lesenden Ein¬ 
träge. 

Die Nameh der Einträge wer¬ 
den in einem Array gebunden. 
Sollte ReadDir weniger Einträ¬ 
ge finden als unter »a« gefor¬ 
dert, werden alle überzählige 
Zeichenketten in dem Array rnit 
einem Nullbyte initialisiert. 

Das f steht für die beiden 
Tool.h-Flags DIRS und FILES. 
Setzt man DIRS, so liefert Re¬ 
adDirO nur Verzeichnisnamen. 
Möchte man nur Filenamen, 
setzt man FILES. Um ein kom¬ 
plettes Directory zu lesen, ver¬ 
knüpfen Sie beide Flags mit 
OR: 

DIRS/FILES 

Wie schon erwähnt schreibt 
ReadDirO Namen der Ein¬ 
träge in ein Array, in unserem 
Beispiel n[N][FLEN]. N ist dabei 
ein Wert, der mindestens so 
groß wie »a«, der Anzahl der er¬ 
warteten Einträge, sein sollte. 
FLEN Ist ein Tool.h-Symbol, es 
steht für die Länge eines File¬ 
namens (31 Zeichen mit ab¬ 
schließender 0). 

Falls erwünscht, liest die 
Funktion auch die Filegröße. 
Sie erwartet dann die Adresse 
eines LONG-Arrays mit N Ele¬ 
menten. N muß wieder minde¬ 
stens die Größe von »a« haben. 

Handelt es sich bei dem Ein¬ 
trag um ein Verzeichnis 
schreibt ReadDirO cl'® ent¬ 
sprechende Stelle im Filelän- 
gen-Array eine -1. 

Benötigt man die Filelänge 
nicht, gibt man als letzten Para¬ 
meter 0 an. Zur Verdeutlichung 
haben wir in Listing 48 einige 
Beispielaufrufe und in Listing 
49 gleich eine Anwendung for¬ 
muliert. ReadDirO erlaubt es, 
wie DIR.c zeigt, mit gerade 20 
Zeilen Ouellcode ein kleines 
DIR-tommano zu formulieren. 

Rufen Sie das Programm mit 
einem Directory-Namen als 


Kommandoparameter auf, liest 
ReadDirO dieses Verzeichnis. 
Im Rumpf der for-Schleife ge¬ 
ben wir es auf dem Bildschirm 
aus. DIR listet dabei die Unter¬ 
verzeichnisse revers. 

Trat ein beim Einlesen ein 
Fehler auf brechen wir das Pro¬ 
gramm mit einem Bildschirm¬ 
blitz und einer entsprechenden 
Fehlermeldung ab. 

Die Routine selbst ist leicht 
zu verstehen, wir haben weiter 
oben besprochen, wie das Le¬ 
sen eines Verzeichnisses gene¬ 
rell aussieht. Merkwürdig mag 
Ihnen vielleicht die Verwen¬ 
dung von »TYPE«, »NAME« und 
»SIZE« Vorkommen. Das sind 
nur Symbole, die wir in Tool.h 
definiert haben. Sie ersparen 
uns und Ihnen Schreibarbeit 
und greifen einfach auf entspre¬ 
chende Komponenten der File- 
InfoBlock-Struktur zu. 

Widmen wir uns zum Schluß 
noch einigen DOS-Funktionen, 
die fast wie CLI-I^mmandos ar¬ 
beiten. 


Wir kommen dabei ohne gro¬ 
ße Erklärungen aus, dann die 
Funktionen sind sehr einfach 
zu handhaben: DeleteFile(na- 
me) löscht den Eintrag mit dem 
Namen »name«: 

BOOL ok; 

ok=DeleteFile("Test"); 

Rename(alt,neu) gibt dem 
Eintrag »alt« den neuen Namen 
»neu«. SetComment(na- 
me,kommentar) hängt einer 
Datei oder einem Verzeichnis 
einen Kommentar von maximal 
116 Zeichen an. SetProtec- 
tion(name,maske) kommt dem 
CLI-Kommando Protect gleich. 
In der Version 1.2 sind vier 
Protect-Bits erlaubt, es sind die 
vier untersten eines 32 Bit- 
Wertes. Dabei bedeutet: 

Bit 0 > Schutz gegen Lö¬ 
schen; 

Bit 1 - Datei nicht ausführbar; 

Bit 2 - gegen Übetschreiben 
geschützt (unbeschreiblich); 

Bit 3 - verbietet das Lesen 
der Datei. 


72 


AMIGA-SONDERHEFT 4 




Alle Funktionen dieses 
»Schnelldurchlaufs« liefern bei 
ordnungsgemäßer Funktion 
den Bool’schen Wert »TRUE«, 
ansonsten »FALSE«. 

Wenn Sie mit den aufgeführ¬ 
ten Funktionen lieber keine ei¬ 
genen CLI-Kommandos schrei¬ 
ben möchten, so können Sie 

mit Execute(anweisung,FH_I, 

FH_0) doch wenigstens Exi¬ 
stierende vom eigenen Pro¬ 
gramm aus starten. 

Die Parameter zwei und drei 
sind die Adressen von File- 
Handle-Strukturen des Inputs 
und des Outputs. 

Geben Sie für FH_I Null an, 

so wird der String »anweisung« 
ausgeführt. Alle Ausgaben der 

Anweisung erfolgen in FH_O. 

Null für FH_O nutzt den Stan¬ 

dard-Output, zum Beispiel das 
aktive CU. 

Alle Befehle 
mit Execute 

Wenn Sie für FH_I die 
Adresse der FileHandle-Struk- 
tur eines eigenen Windows 
übergeben, führt die Angabe 
eines Nullzeigers als Anwei¬ 
sungsstring zum Start ein neu¬ 
en CLI's (siehe auch Listing 8). 
Voraussetzung für das korrekte 
Arbeiten der ExecuteQ-Funk- 
tion ist das Vorhandensein des 
Programms RUN im Verzeich¬ 
nis C:. Die mit ExecuteQ aufge- 
.rufenen Programme laufen als 
Task, als wären Sie vom CLI 
aus mit RUN aufgerufen wor¬ 
den. Einige kleine »Probleme«, 
die es zu lösen gilt, sollen an 
dieser Stelle den Kurs abrun¬ 
den: 

- Schreiben Sie ein Programm 
das ständig das aktuelle Ver¬ 
zeichnis anzeigt - auch nach ei¬ 
nem Diskettenwechsel. 

- Erstellen Sie ein neues CLI- 
l^mmando namens Print. Das 
Programm soll ein File, dessen 
Name als Kommandoparame¬ 
ter geliefert wird, ausdrucken. 

- Ändern Sie Listing 44 so ab, 
daß der komplette aktuelle 
Screen als File abgelegt wird. 
-Ändern Sie TYPE.c (Listing 
43) so ab, daß Sonderzeichen 
unterdrückt werden. Der An¬ 
wender kann dann auch aus¬ 
führbare Programme listen. 

- Verändern Sie das aktive CLI- 
Window so, daß Sie ihre Compi- 
lier-Optionen in Zukunft über 
Pull-Down-Menü anwählen 
können. 

- Schreiben Sie einige Pro¬ 
gramme, die wichtige CLI-Kom¬ 
mandos ersetzen können. Fas¬ 
sen Sie sie in einem Programm 
zusammen, welches Sie paral¬ 
lel zum CLI benutzen können. 
Die einzelnen Funkionen soll 


man über Pull-Down-Menüs 
wählen können. 

- Entwickeln Sie ein Pro¬ 
gramm, welches erlaubt, einen 
beliebigen Ausschnitt des 
Workbenchscreens auszu¬ 
drucken. 

- Versuchen Sie den Work- 
benchscreen auf eine Bit 
Planes zu beschränken oder 
um BitPlanes zu erweitern. 

- Schreiben sie eine Routine, 
mit der man den den Inhalt ei¬ 
nes Windows mit den Cursorla¬ 
sten in vier Richtungen scroilen 
kann. 

- Schreiben sie eine Routine, 
mit der man den den Inhalt ei¬ 
nes Windows mit den Cursorta¬ 
sten in vier Richtungen rotieren 
kann. Der Inhalt darf also nicht 
verloren gehen. Was beispiels¬ 
weise links verschwindet, soll 
rechts wieder erscheinen. 

- Verändern Sie vom Pro¬ 
gramm aus den Mauszeiger. 


Das Programm soll beim Aufruf 
die Hintergrundfarbe des akti¬ 
ven Screens verändern. Beim 
Verlassen muß natürlich die al¬ 
te Farbe wieder hergestellt wer¬ 
den. 

- Zeichnen Sie einige geome¬ 
trische Figuren in ein Window. 
Kopieren Sie dessen Inhalt in 
eine BitMap und von dort in ein 
anderes Window. 

- Definieren Sie mehrere Bool- 
Toggle-Gadgets. Ganz gleich, 
welches Gadget der Anwender 
bedient, es darf immer nur das 
zuletzt gewählte als aktiviert er¬ 
scheinen. 

- Schreiben Sie ein Programm, 
das Guru-Nummern in Klartext 
wandelt. Die Nummer sollte 
man in ein String-Gadget ein¬ 
tragen können. 

Und zum Schluß noch für die 
Profis unter Ihnen: 

- Alle professionellen Program¬ 
me verfügen über einen 



Name 

Aufgabe der Tool.h-Funktlon 

OpenLibO 

für Intuition und Grafik benötigte Libraries 
öffnen 

CloseLibQ 

die mit OpenLibQ geöffneten Libraries 
schließen 

GetScreenQ 

Screen öffnen 

ACTIVE_SCREEN 

Zeiger auf aktiven Screen (Makro) 

GetWindowO 

Window öffnen 

ACTIVE_WINDOW 

Zeiger auf aktives Window (Makro) 

GetMessageQ 

Intuition-Message und verschiedene Werte 
lesen 

LineO 

Linie zeichnen 

ILineQ 

Linie im JAM1))öCOMPLEMENT-Modus 
zeichnen 

BlockQ 

ausgefüllter Block zeichnen 

IBIockQ 

Block im JAM1))öCOMPLEMENT-Modus 
zeichnen 

IRastQ 

RastPort im JAM1))öCOMPLEMENT-Modus 
darstellen 

GetPosQ 

Position des Grafikcursors im RastPort 
ermitteln 

GetColQ 

Ermittelt Farbwert und splittet ihn in R-G-B 

PrintQ 

Ausgabe eines Textes 

EIIFillO 

ausgefüllte Ellipse zeichnen 

CircFillQ 

Ausgefüllter Kreis zeichnen (Makro) 

HrdCpyQ 

RastPort (oder Teil davon) in beliebiger 

Größe ausdrucken 

GetGadgetO 

Gadget initialisieren. In Liste elnfügen und 
darstellen 

GetMenuQ 

Menu-Struktur initialisieren, in die Menu- 
Liste einfügen 

GetltemQ 

Menultem-Struktur initialisieren, in die 
Item-Liste einfügen 

GetSItemO 

Subitem initialisieren und in die 

Subltem-Liste einfügen 

GetRequestO 

frei definierbaren Requester (Dialogfeld) 
installieren 

ExistsQ 

Existenz eines Eintrags feststellen 

GetFileO 

File In Speicher laden 

FreeFileQ 

Speicher für File freigeben (Makro) 

PutFileQ 

Puffer speichern 

GetLWQ 

die Nummer des aktuellen Laufwerks 
ermitteln 

ReadDirO 

Diskettenverzeichnis und Informationen 
lesen 


Tabelle 18. Die Tool.h-Funktionen vereinfachen die 
Programmierung von Intuition und Grafik 


File-Requester oder File- 
Window. Diese Routinen zei¬ 
gen in einem Block das aktuelle 
Verzeichnis an. Paßt dieses von 
der Länge her nicht in den 
Block, kann man mittels eines 
Proportional-Gadgets die An¬ 
zeige nach oben und unten 
scroilen. 

Mehrere Gadgets, zu Bei¬ 
spiel mit der Aufschrift »DFO:« 
oder »DF1:« erlauben es, mit ei¬ 
nem Mausklick das Laufwerk 
zu wechseln. Ein Klick auf ei¬ 
nen Verzeichnisnamen im An- 
zetgeblock und schon wird die¬ 
ses Verzeichnis gelistet. 

In String-Gadgets wird der 
Anwender ständig über den 
Pfadnamen und den Filena¬ 
men, den man ebenfalls be¬ 
quem per Mausklick im Anzei¬ 
geblock wählt, informiert. Na¬ 
türlich kann man dort auch die 
Namen über die Tastatur einge¬ 
ben. 

Mittels zwei weiteren Gad¬ 
gets, mit der Aufschrift OK und 
C^NCEL, kann der Anwender 
seine Wahl bestätigen oder ab¬ 
brechen. Möchten Sie in Zu¬ 
kunft auf derartige Bedie¬ 
nungsfreundlichkeit in Ihren 
Programmen verzichten? 

Falls Ihnen die eine oder die 
andere unserer Übungsaufga¬ 
ben nicht lösbar erscheint, le¬ 
sen Sie im betreffenden Kapitel 
noch einmal nach. Alle Aufga¬ 
ben beziehen sich auf eine Aus¬ 
sage im Text. 

»Verdauen« Sie den bespro¬ 
chenen Stoff - zugegeben, es 
war eine ganze Menge - und te¬ 
sten Sie einfach alle Routinen 
ausgiebig, innerhalb kürzester 
Zeit werden Sie sich fragen, wie 
Sie solange ohne sie ausge¬ 
kommen sind. Wir hoffen, daß 
Ihnen mit unserem C-Kurs für 
Amiga-Programmierer den Ein¬ 
stieg in die Programmierung 
mit Betriebssystemroutinen ge¬ 
lingen wird und daß Ihnen, wie 
zu Anfang versprochen, unser 
Tool.h zu einem wertvollen 
Werkzeug geworden ist. Tabelle 
18 stellt nochmals alle Funktio¬ 
nen und Makros und deren Auf¬ 
gabe gegenüber. 

Mit diesem Headerfile wird 
die Programmierung der - zu¬ 
gegeben relativ komplizierten - 
Intuitionfunktionen stark verein¬ 
facht. Sie sparen sich die Initia¬ 
lisierung einiger Parameter, die 
auf Standardwerke gesetzt wer¬ 
den. Daneben erhalten Sie - 
wie Tabelle 18 zeigt - 29 neue 
hilfreiche Funktionen, die Ihnen 
das Leben mit Intuition + Co. 
erleichtern. 

Wir wünschen Ihnen beim 
weiteren Arbeiten mit Ihrem 
Amiga viel Erfolg und vor allem 
viel Spaß! 

(Arno Gölzer/so) 
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E in in Assembler ge¬ 
schriebenes Programm 
ist ungefähr 200mal 
schneller als ein Basic-Pro- 
gramm und oft genug noch 
tOmal schneller als die Lösung 
in C. Nun mag ja manche Leute 
das Tempo nicht beeindrucken, 
sie haben Zeit. Es gibt jedoch 
weitere Gründe, sich mit Ma¬ 
schinensprache zu befassen. 

Ein Basic-Interpreter (oder 
ein C-Compiler) kratzt eigent¬ 
lich nur an der Oberfläche ei¬ 
nes Riesenpotentials von Mög¬ 
lichkeiten, die in einem Compu¬ 
ter, beispielsweise dem Amiga, 
stecken. Will man mehr, dann 
muß man das der CPU (der 
Zentraleinheit) nur sagen - al¬ 
lerdings in ihrer Sprache, und 
das ist nun mal Assembler. 

Noch ein Grund: Man sollte 
eigentlich immer die Sprache 
verwenden, die das jeweilige 
Problem mit minimalem Auf¬ 
wand löst. Oft genug, sogar 
meistens, ist das nicht Assem¬ 
bler. Ich möchte sogar fast be¬ 
haupten, je besser man Assem¬ 
bler kann, desto weniger 
braucht man diese Sprache. 
Ein Assembler-Programmierer 
weiß nämlich, was er mit wel¬ 
chen Befehlen, zum Beispiel in 
Basic, der CPU an Arbeit zumu¬ 
tet und kommt so zwangsläufig 
zu besseren Programmen. 
Denn das muß ich nun leider 
schon einmal andeuten, As¬ 
sembler setzt gute Kenntnisse 
der Funktion eines Computers 
voraus. Aber zum Trost: Diese 
Kenntnisse erwirbt man am be¬ 
sten, wenn man Assembler 
lernt. 

Untersucht man ein Pro¬ 
gramm, das in einer Hochspra¬ 
che geschrieben wurde oder 
geschrieben werden soll, dann 
stellt man fest, daß es nur an ei¬ 
nigen Stellen (meistens nur an 
einer Stelle) das Tempo-Pro¬ 
blem gibt oder die passende 
Funktion fehlt. Dann sollte man 
auch nur diesen Teil in Assem¬ 
bler schreiben und ihn in die 
Hochsprache einbinden. 

Eine neue 
Fremdsprache 

Im Gegensatz zur höheren 
Mathematik, die schwieriger ist 
als die »niedrige«, ist es bei den 
Programmiersprachen eher 
umgekehrt. Die Sprachen weit 
weg von der Maschine nennt 
man Hochsprachen, in Assem¬ 
bler sind wir »ganz unten«, 
Auch wenn Sie später nur noch 
in den höheren Regionen 
schweben, Sie wissen, mit ei¬ 
ner soliden Grundausbildung 
schwebt es sich leichter. Man 
fällt dann nicht so leicht herun¬ 


ter. Wir müssen jetzt aber in die¬ 
se Niederungen hinabsteigen, 
denn was da unten los ist, müs¬ 
sen Sie schon wissen. 

Wer eine Programmierspra¬ 
che beherrscht und sie erfolg¬ 
reich anwendet, der lernt auch 
jede andere. Die Sache ist näm¬ 
lich ganz einfach. Entweder 
man kann programmieren oder 
man kann es nicht. Man muß 
ein paar neue »Vokabeln« ler¬ 
nen, aber die Grundlagen, wie 
Schleifen, Verzweigungen oder 
Unterprogramme wendet man 
wie üblich an. Solche Grund¬ 
kenntnisse setzen wir für die¬ 
sen Kurs voraus, Basic, C oder 
Pascal sollten Sie also schon 
können. Generell ist Assembler 
nicht schwieriger als Basic, nur 
etwas umständlicher. Zu diesen 
Umständlichkeiten gehört auch, 
daß Sie wissen müssen, wie 
der Computer funktioniert. Das 


Faszinierend: Maschinensprache 
jedoch das Gerücht ver- 
in Assembier sei ein Job nur für Bit- 
Aichimisten. Lassen 
Bockshorn jagen. Assem- 
mierer kochen 
Ende dieses Kurses von 
sind auch Sie in der Lage, Pro- 
mit Maschinensprache 



betrifft nicht nur den 68000er- 
Prozessor (das Ist das kleinere 
Problem), sondern primär das 
Betriebssystem. Assembler- 
Programmierung ohne Kennt¬ 
nisse von Exec, DOS oder Intui¬ 
tion ist nicht möglich. 

In einem Punkt haben Sie 
übrigens mit Ihrem Amiga Pech 
gehabt. Unsere Freundin hat 
zwar das komfortabelste Be¬ 
triebssystem aller PCs, 
aber leider auch a 

das komplizier-^^ M 


Der Luxus, den der Anwender 
sieht, ist die Arbeit der System¬ 
programmierer. Als Assembler- 
Programmierer dürfen Sie sich 
zu letzteren zählen, und somit 


schuften, damit der Anwender 


seine Freude hat. 


Scheinbar ist ein Computer 
ein Rechengenie, das blitz¬ 
schnell die kompliziertesten 
Aufgaben löst. Doch geht man 
der Sache einmal auf den 
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auf dem Amiga. Irgendwie hat sich 

breitet, Programmieren 

Magier und 

Sie sich nicht ins 

bier-Program- 

auch nur mit Wasser. Am 

Peter Wolischiaeger 


Grund, stößt man auf die 
schreckliche Wahrheit. Unser 
Wunderkind kann nicht bis Drei 
zählen, noch nicht einmal bis 
Zwei, es kennt gerade die Null 
und die Eins. Ursache ist, daß 
die elektrischen Schaltkreise, 
aus denen ein Computer be¬ 
steht, nur zwei Zustände an¬ 
nehmen können, nämlich 
»Spannung da« oder »Span¬ 
nung nicht da«. 



gramme 
aüfAj werten, 


> 


ir 



\\äX. 


Ein paar Hunderttausend 
dieser Schaltkreise bilden nun 
die CPU (Central Processing 
Unit, Zentraleinheit, praktisch 
das Herz des Computers), 
nochmals mehr als 8 Millionen 
davon (so Sie einen Mega- 
Amiga haben) sind der Spei¬ 
cher (das Gedächtnis) 
des Computers. 


Ein Programm ist nichts wei¬ 
ter als ein bestimmter Zustand 
dieses Speichers. Da es nun 
höchst unpraktisch ist, ein Pro¬ 
gramm in der Art zu beschrei¬ 
ben »Transistor 1 leitet, Transi¬ 
stor 2 auch, Transistor 3 sperrt 
und so weiter«, kam man 
schnell auf eine Kurzschreib¬ 
weise dieser Art: Der eine Zu¬ 
stand heißt 0 der andere 1. 


Von Null 
bis Eins 


Höher; 

Assembier 


Das gefällt Ihnen nicht? Nun, 
das ist die Maschinensprache, 
mehr nicht! Was Sie vielleicht 
schon erkannt haben: Dieses 
0101011-Muster ist eine Zahl in 
dualer Schreibweise. Die Zah¬ 
len kann man umrechnen in 
Dezimal- oder Hexadezimal¬ 
zahlen, das spart etwas Papier, 


So kann man ein Programm 
doch schön kompakt schrei¬ 
ben, zum Beispiel als: 


010111001101010101010 


Kurse 


es bleibt aber Maschinenspra¬ 
che. 

Manche Leute behaupten 
nun, Assembler sei diese Ma¬ 
schinensprache. Gott sei Dank 
haben die Unrecht, das wäre ja 
schrecklich. Die armen Kerl¬ 
chen, die die ersten Computer 
so programmiert haben, tun mir 
heute noch leid. Assembler ist 
die nächsthöhere Stufe und 
war einst der ganz große Fort¬ 
schritt und viele Jahre lang 
auch die einzige Sprache über¬ 
haupt. Nun muß ich leider doch 
noch etwas ausholen. 

Wenn Sie bei Bit nicht mehr 
zuerst an Bier denken, sind Sie 
schon Programmierer, OK... 
Ein Bit ist eine Speicherstelle, 
ein solcher Schaltkreis im Com¬ 
puter, der nur diese Zustände 0 
oder 1 annehmen kann. Aus 
technischen Gründen hat man 
immer 8 Bit zusammengefaßt, 
diese 8 Bit nennt man ein Byte. 
Der Speicher eines Computers 
besteht aus Tausenden oder 
Millionen von Bytes. Damit man 
nun jedes B^^e ansprechen 
kann, sind sie durchnumeriert. 
Diese Hausnummern der Bytes 
nennt man Adressen. Mit den 8 
Bit eines Bytes lassen sich in 
dualer Schreibweise die Zahlen 
00000000 bis 11111111 darstel¬ 
len, dezimal ist das 0 bis 255. 

Bewegen 
ist alles 

ln ein Byte (der Fachmann sagt, 
auf eine Adresse) kann ich nun 
eine solche Zahl hineinschrei¬ 
ben und sie wieder herausle¬ 
sen. Die sogenannten Periphe¬ 
rie-Geräte wie der Bildschirm, 
die Tastatur oder ein Drucker 
sind nun mit einem Teil des 
Speichers (unseren Bytes) ver¬ 
bunden. Wenn ich auf die richti¬ 
ge Adresse eine Zahl schreibe, 
dann erzeugt sie eine Wirkung 
auf dem Bildschirm, wenn ich 
aus einer anderen Adresse et¬ 
was lese, dann kann das zum 
Beispiel eine Taste des Key¬ 
boards sein. 

Folglich besteht ein Pro¬ 
gramm zum großen Teil daraus, 
Zahlen - man spricht auch von 
Daten - auf eine Adresse zu 
schreiben, von einer anderen 
zu lesen und ganz wesentlich, 
Daten von einer Adresse (zum 
Beispiel Tastatur) auf eine an¬ 
dere Adresse (zum Beispiel 
Bildschirm) zu kopieren. 

Neben den Daten kennt so 
ein Computer auch Befehle, na¬ 
türlich auch nur als 010101110, 
sprich als Zahlen. 

Nehmen wir an, die Zahl 
11111111 ist der Befehl »Kopiere« 
und wir wollen Daten von der 
Adresse 0000011 (dezimal 3) 
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auf die Adresse 00001001 (dezi¬ 
mal 9) kopieren, dann lautet 
dieses Programm in Maschi¬ 
nensprache: 

11111111 

00000011 

00001001 

In Assembler hingegen 
schreibt man dafür: 

MOVE 3,9‘ 

»Move« heißt bewege, hier: 
bewege, was im Byte mit der 
Adresse 3 steht zum Byte mit 
der Adresse 9. Um gleich einen 
großen Denkfehler auszu¬ 
schließen: Das Byte 3 bleibt un¬ 
verändert, es wird nur in das 
Byte 9 kopiert. Sie haben recht, 
der Befehl müßte eigentlich 
COPY heißen, aber er heißt nun 
mal MOVE. 

So, den Unterschied zwi¬ 
schen Assembler und Maschi¬ 
nensprache hätten wir, ist doch 
ein Fortschritt, oder? 

Doch schon haben wir das 
nächste Problem. Der Begriff 
»Assembler« hat nämlich eine 
doppelte Bedeutung. Zum ei¬ 
nen ist damit eine Program¬ 
miersprache gemeint, genauso 
wie zum Beispiel Basic oder 
Modula. Der Unterschied ist 
hauptsächlich, daß Assembler 
immer an eine bestimmte CPU 
(Hauptprozessor) gebunden 
ist. Es gibt zum Beispiel den 
6502-Assembler, den 8088-As- 
sembler und natürlich den 
68000-Assembler, um den es 
hier geht. Die Sprache hat Be¬ 
fehle, wie alle anderen Spra¬ 
chen auch, die tippen Sie auch 
einfach so ein, wie üblich. 

Der große Unterschied zum 
Beispiel zu Basic ist dann nur, 
daß Sie danach nicht RUN ge¬ 
ben können, sondern den Text 
erst assemblieren müssen. Ge¬ 
nau das erledigt ein Programm, 
das dummerweise auch As¬ 
sembler heißt. Dieses Pro¬ 
gramm übersetzt den Text in die 
Maschinensprache, also die 
0101010-Folge, die die CPU 
letztendlich nur versteht. 

Ganz oben: 
Hochsprachen 

ln einer Hochsprache, wie 
zum Beispiel C geben Sie auch 
nur Text ein, auch der muß 
übersetzt werden. Nur nennt 
man dann das Übersetzungs¬ 
programm nicht Assembler, 
sondern Compiler. Das heißt, 
sowohl nach einem Assembler- 
als auch nach einem Compiler¬ 
lauf entsteht ein Programm in 
Maschinensprache, das auf ei¬ 
nem Computer ausgeführt wer¬ 
den kann. Über Größe und 
Schnelligkeit der Programme 
ist damit noch nichts gesagt. 


Ganz anders sieht es bei ei¬ 
nem Interpreter aus; der ty¬ 
pischste Vertreter dieser Gat¬ 
tung ist wohl Basic. Auch hier 
geben Sie das Programm als 
Text ein. Vielleicht wird es nach 
der Eingabe noch etwas aufbe¬ 
reitet und komprimiert, aber es 
bleibt Text, der nicht die gering¬ 
ste Ähnlichkeit mit Maschinen¬ 
sprache hat. 

Folglich kann der Computer 
ein Basic-Programm auch nicht 
ausführen. Diese Aufgabe 
übernimmt der Interpreter. Er 
liest den Basic-Text Zeichen für 
Zeichen und untersucht ihn auf 
Basic-Befehle. Findet er einen 
Basic-Befehl, so ruft er eine 
Routine auf, die den Befehl 
ausführt. Die Routine befindet 
sich natürlich als ausführbares 
Maschinenprogramm im Spei¬ 
cher. Sie übernimmt es auch, 
zu einem Basic-Befehl gehöri¬ 
ge Daten (Parameter) im Basic 
zu suchen. Selbstverständlich 
ist auch der Interpreter selbst 
ein Programm in Maschinen¬ 
sprache. Alle schnellen Basic- 
Interpreter sind in Asembler ge¬ 
schrieben. 

Assembler 
im Prinzip 

Ja, wenn denn nun der Com¬ 
piler genauso Maschinen-Code 
erzeugt, wie ein Assembler, 
dann sollte ich mir die Sache 
doch noch einmal genau über¬ 
legen. 

In Pascal zum Beispiel 
schreibe ich einfach nur: 
Write('Hallo') 
und in Assembler tippe ich da¬ 
für (nur als Beispiel): 

MOVE #'H',4711 
MOVE #'a',4712 
MOVE #'1',4713 
MOVE #'1',4714 
MOVE #'o’,4715 

Demnach ist ein Assembler¬ 
programm die Auflösung von 
zum Beispiel Pascal-Befehlen 
wie WRITE in viele Einzelbe¬ 
fehle. Man kann es auch anders 
sagen: Pascal kennt eine be¬ 
stimmte Menge von Befehlen, 
aus denen der Compiler die 
passende Folge von Assem¬ 
bler-Befehlen erzeugt. 

Tatsächlich ist jedes Assem¬ 
bler-Programm (in der noch 
nicht übersetzten Textform) im¬ 
mer länger als sein Äquivalent 
in einer Hochsprache. Nur 
wenn Sie einmal nach dem As- 
semblieren beziehungsweise 
dem Compilieren jeweils die 
Bytes des Codes zählen, dann 
ist ein Assembler-Programm 
drastisch kürzer und schon 
deshalb auch schneller. Das 
liegt daran, daß kein Compiler 
einen so kompakten Code ge- 



... gehört noch zu der Techni¬ 
kergeneration, die digitale 
Schaltungen bis hin zum Com¬ 
puter mit einzelnen Transisto¬ 
ren entwickelte. Programmiert 
hat er damals nur nebenbei. 
Mit der Einführung der Mikro¬ 
prozessoren verlagerte sich 
seine Tätigkeit zur Software. 
Durch ständige Weiterbildung 
und über 20 Jahre praktische 
Erfahrung als Systemprogram¬ 
mierer wurde er zu einem Top- 
Experten für Mikrocomputer. 
Nebenberuflich arbeitet Peter 
Wollschiaeger als freier Mitar¬ 
beiter für verschiedene Zeit¬ 
schriften und als Buch-Autor. 
Er bringt die journalistische Er¬ 
fahrung aus weit über 100 Arti¬ 
keln sowie mehreren Büchern 
für den Atari ST und Amiga mit. 
Dies befähigt ihn, auch schwie¬ 
rige Themen leicht verständ¬ 
lich und angenehm lesbar dar¬ 
zustellen. 


nerieren kann, wie es ein As¬ 
sembler-Programmierer macht. 

Letzterer weiß ja, was er will, 
er kann jede Befehlsfolge 
»maßschneidern«, ein Compi¬ 
ler hingegen muß Universallö¬ 
sungen einsetzen. 

Ganz drastisch, im Tempo so 
bis zu Faktor 200, ist der Unter¬ 
schied zu einem Basic-Interpre- 
ter. Dieser übersetzt - wie 
schon geschildert - erst wäh¬ 
rend der Laufzeit, und dann im¬ 
mer nur einen Befehl. Das 
heißt, wenn in einer Schleife ein 
Befehl hundertmal wiederholt 
wird, dann wird er auch hun¬ 
dertmal übersetzt. In einem As¬ 
semblerprogramm hingegen ist 
der Befehl schon übersetzt. 

Die typische Arbeitsfolge ei¬ 
ner Programmentwicklung in 
Assembler sind Texteingabe, 
Assemblieren, Linken (kommt 
gleich) und Testen. Das sind Ih¬ 
re Werkzeuge, und wie in jedem 
Handwerk kommt es darauf an, 
daß Sie mit den richtigen Werk¬ 
zeugen arbeiten. Da gibt es nun 
leider eine große Auswahl, und 
die Prospekte der Hersteller 
versprechen alle viel. Ich möch¬ 
te Ihnen hier einige Tips geben, 
die Sie bei der Auswahl beach¬ 
ten sollten. Ein Assembler ist 


ein Profi-Werkzeug, für das ei¬ 
ne gute Dokumentation und 
Unterstützung durch den Her¬ 
steller oder Händler (Support) 
benötigt werden. Natürlich be¬ 
kommen Sie ein (versehentlich) 
kopiertes Spielprogramm auch 
per »Trial and Error« zum Lau¬ 
fen. Dies auf einen Assembler 
anzuwenden, dürfte nur etwas 
für Leute mit sehr guten Nerven 
und unendlich viel Zeit sein. Es 
ist nämlich durchaus möglich, 
daß alle Programme in diesem 
Buch mit Ihrem speziellen As¬ 
sembler nicht laufen, weil Ihr 
Assembler an einer Stelle einen 
Punkt verlangt, den meiner 
nicht braucht. Warum also kno¬ 
beln, wenn alles im Handbuch 
steht. 

Einen Editor brauchen Sie für 
die Texteingabe und dessen 
f^rrektur. Den Text nennt man 
Quell-Text (Source-Text). Übli¬ 
cherweise werden Editor und 
Assembler zusammen ver¬ 
kauft. Sie können aber auch oh¬ 
ne weiteres Ihr gewohntes Text¬ 
verarbeitungsprogramm neh¬ 
men, wenn Sie sich auf reinen 
Text (keine Formatier- und Steu¬ 
erzeichen) beschränken. Auch 
ED (gehört zum Amiga) ist dafür 
brauchbar. 

Ist der Text fertig (und auf der 
Diskette), starten Sie den As¬ 
sembler, der dann mindestens 
wissen will, wie der File mit dem 
Quelltext (Source-File) heißt. 
Der Assembler erzeugt den 
Maschinen-Code (dieses 
010101010), - auch Objekt- 
Code genannt - und legt diesen 
in dem Ziel-File (dem Objekt- 
File) auf der Diskette ab. Das 
kostet natürlich Zeit, und so er¬ 
scheint es sinnvoll, auch »in 
memory« assemblieren zu kön¬ 
nen. Das bedeutet, der Assem¬ 
bler schreibt auf Wunsch den 
Code direkt in den Speicher, 
und man kann das Programm 
zu Testzwecken starten. Daß 
man es danach (oder vorher) 
auf die Diskette bringen kann, 
ist logisch. 

Der Assembler kann Textmo- 
dule einbinden. Das ist sehr 
wichtig, denn Amiga-Program- 
me benötigen immer die sehr 
zahlreichen Definitionen der 
sogenannten Libraries (Biblio¬ 
theken), die als Textmodule vor¬ 
liegen. Kommt eine neue Work- 
bench, gibt es auch neue Mo- 
dule, natürlich im Commodore- 
Format. Deshalb ist es extrem 
wichtig, daß ein Assembler die¬ 
ses Format versteht. 

Ausführlich werden Makros 
noch behandelt. Hier nur so¬ 
viel: Makros tragen stark zur 
Rationalisierung der Arbeit bei 
und helfen, Fehler zu vermei¬ 
den. Auch gehören Makros zu 
den obengenannten Include- 


76 


AMIGA-SONDERHEFT4 



Kurse 


Files, folglich gilt auch hier die 
Forderung, daß der Assembler 
Makros im Commodore-Fbrmat 
versteht. 

Nun brauchen Sie den Lin¬ 
ker, zu deutsch Binder. Der Bin¬ 
der hat zwei Aufgaben. Zum ei¬ 
nen können Sie ein Programm 
in Module aufteilen, die Sie ge¬ 
trennt assemblieren und testen 
können (bei großen Program¬ 
men empfehlenswert). 

Der Linker 

Diese Module müssen Sie 
dann mit dem Linker zu einem 
Programm zusammenbinden. 
Der zweite Grund liegt beim 
Amiga selbst. Jedes Programm 
hat einen kleinen Vorspann, 
Header genannt, in dem zum 
Beispiel steht, wie groß das Pro¬ 
gramm ist. Ohne diese Informa¬ 
tion kann der Amiga das Pro¬ 
gramm nicht laden und starten. 
Folglich muß der Linker zumin¬ 
dest diesen Header mit Ihrem 
Programm binden. Es gibt aber 
auch Assembler, die das schon 
tun. Das erspart den zusätzli¬ 
chen Linkerlauf, was man 
durchaus positiv sehen sollte. 

Starten Sie nun Ihr Pro¬ 
gramm, gibt es drei Möglichkei¬ 
ten: entweder es läuft, es läuft 
nicht oder es läuft falsch. Um 
den Bug (Programmierer-Slang 
für Fehler) zu finden, bieten 
sich viele Lösungen an. Die ein¬ 
fachste (und meist erfolgreich¬ 
ste) Methode ist ein tiefer Blick 
auf den Quelltext, kombiniert 
mit intensivem Nachdenken. 

Wenn Sie aber wissen wol¬ 
len, was das Programm an ei¬ 
ner bestimmten Stelle tut oder 
welche Werte dann einige Va¬ 
riable haben, wird’s schwierig. 
Möglich ist es, an diesen Stel¬ 
len sozusagen ein »PRINT A,B«< 
einzubauen, was aber in As¬ 
sembler recht aufwendig ist, 
wie wir noch sehen werden (es 
gibt keinen Print-Befehl). 

Praktischer ist es dann, ei¬ 
nen sogenannten Debugger 
(Entwanzer, Fehler sind Wan¬ 
zen!) einzusetzen. Das ist ein 
Programm, mit dem Sie Ihr Pro¬ 
gramm in Einzelschritten ab¬ 
laufen lassen und sich an jeder 
Stelle die Werte der Variablen 
ansehen können. 

Editor, Compiler, Linker und 
Debugger (soweit vorhanden) 
werden meistens im Paket an- 
geboten (so sollte es sein). Häu¬ 
tig gehört dazu noch eine soge¬ 
nannte Shell (eigene Benutzer¬ 
oberfläche), die es Ihnen ge¬ 
stattet, zum Beispiel direkt vom 
Editor in die Shell zu wechseln, 
wo Sie dann den Linker aufru- 
fen. Das ist, sofern man ohne 
RAM-Disk arbeitet, schneller 
als der Umweg über die Work- 
bench beziehungsweise das 


CLI. Ansonsten hat eine gute 
Shell den Vorteil, daß sie sozu¬ 
sagen eine für die Programmie¬ 
rung maßgeschneiderte Work- 
bench ist. 

Eine ausführliche Vorstel¬ 
lung der beschriebenen Werk¬ 
zeuge finden Sie in diesem 
Sonderheft ab Seite 6. 

Generell läuft ein Programm 
in einem Computer nach der 
Methode »Fetch and Execute« 
(Holen und Ausführen). Die 
CPU holt sich aus dem Spei¬ 
cher einen Befehl und führt ihn 
aus. Danach holt sie sich auto¬ 
matisch den nächsten Befehl 
und führt diesen aus, und so 
weiter. Natürlich muß im Spei¬ 
cher etwas stehen, das die CPU 
holen und ausführen kann, und 
das nennt man dann Pro¬ 
gramm. 

Ein Programm ist also nichts 
weiter als eine Folge von Bytes, 
die irgendwo im RAM oder 
ROM steht. Natürlich kann die 
CPU nicht wissen, wo das Pro¬ 
gramm im Speicher steht. Des¬ 
halb wird sie beim Start (Reset) 
per Hardware-Vorgabe (und 
später durch den Lader des 
GEMDOS) sozusagen mit der 
Nase auf eine Anfangsposition 
gestoßen. Ab diesem Augen¬ 
blick holt sich die CPU immer 
ein Wort (das sind 2 Byte ne¬ 
beneinander, also 16 Bit) aus 
dem Speicher und decodiert 
dieses Wort. Dabei kommt 
dann (hoffentlich) ein Befehl für 
die CPU heraus. Diesen Befehl 
arbeitet sie ab und holt dann 
das nächste Wort. Zu einem 
Befehl können Daten gehören. 
Beim Addier-Befehl zum Bei¬ 
spiel muß die CPU wissen, was 
addiert werden soll. Wieviel Da¬ 
tenworte zu einem Befehl gehö¬ 
ren, ist auch im ersten Wort 
(dem Befehlswort) codiert. 

Nur gerade 
Adressen erlaubt 

Der gesamte Speicher ist By¬ 
te für Byte von Null bis zum En¬ 
de durchnumeriert, diese Num¬ 
mern der Speicherplätze nennt 
man Adressen. Die CPU arbei¬ 
tet immer nur mit diesen Adres¬ 
sen und führt dazu intern einen 
Zähler, der immer auf die ak¬ 
tuelle Adresse zeigt, bei der sie 
gerade ist. Diesen Zähler nennt 
man »Program Counter«, kurz 
PC. 

Der 68000 kennt Befehle oh¬ 
ne Daten, die sind dann ein 
Wort lang, aber auch solche mit 
bis zu vier Datenworten. Das 
heißt, beim 68000 kann ein ein¬ 
ziger Befehl mit seinen Daten 
bis zu 10 Byte (fünf Worte) bele¬ 
gen. Der 68000 ist zwar eine 
Byte-Maschine (er liest den 
Speicher Byte für Byte), jedoch 


muß jeder Befehl auf einer ge¬ 
raden Adresse (Wortgrenze) 
beginnen, andernfalls passiert 
Übles. Sie können (und müs¬ 
sen sogar) den PC verändern. 
Wenn nämlich ein Programm 
nicht nur einfach Befehl für Be¬ 
fehl abläuft. Sie also zum Bei¬ 
spiel ein GCfTO benötigen, 
dann heißt das in Assembler zu¬ 
erst einmal »GÖTD Adresse«. 
Praktisch heißt das aber für die 
CPU »Setze PC = Adresse«. 
Wenn Sie da eine ungerade 
Adresse angeben, stürzt leider 
Ihr Programm ab. 

In der Praxis tritt dieser Feh¬ 
ler auf, wenn Sie im Programm 
Daten definieren. Wenn Sie 
zum Beispiel den Text »Franz 
Meier« drucken wollen, müssen 
Sie irgendwo im Speicher eine 
Byte-Folge mit den ASCII- 
Codes dieser Zeichen haben. 


Folgt dann der Text »8000 Mün¬ 
chen«, und Sie wollen diesen 
Text einmal alleine drucken, 
dann sollten Sie wissen, wie 
lang »Franz Meier« ist, damit 
»8000 München« auf einer ge¬ 
raden Adresse beginnt. Um die¬ 
se Abzählerei zu ersparen, ha¬ 
ben gute Assembler einen Be¬ 
fehl (EVEN oder CNOP), der 
Texte (oder Daten allgemein) 
auf eine gerade Adresse ju¬ 
stiert. Ist die Adresse sowieso 
gerade, passiert nichts. Ein 
»Even« zuviel schadet also 
nichts, eines zu wenig dagegen 
sehr. So informiert, werden Sie 
also nie wieder vor einem Text 
den EVEN-Befehl (oder Gleich¬ 
artiges) vergessen, wie das die 
anderen Anfänger tun, oder? 

Das hexadezimale Zahlensy¬ 
stem ist in Assembler üblich 
(und sehr vorteilhaft), machen 
Sie sich bitte unbedingt mit die¬ 
sem Zahlensystem vertraut.' 
Hier ein Schnellkurs: 

Die Basis ist nicht 10, wie im 
Zehner- oder Dezimalsystem, 
sondern 16. Für die fehlenden 
»Ziffern« von 10 bis 15 schreibt 
man A bis F. In dezimal sagt 
man für die Zahl 345 auch 


5 Einer plus 4 Zehner + 

3 Hunderter. 

In hex ist die Basis 16. Die 
Folge wäre also nicht 1,10,100, 
1000, sondern 1,16,256,4096. 

Sie wissen, F hat den Wert 
15. Demnach ist FFFF: 

15 * 4096 15 * 256 +15 

16 + 15 « 1 = 65535 

Listing 1 enthält ein kleines 
Programm in Amiga-Basic zum 
Üben. Wenn Sie eine Dezimai¬ 
zahl eingeben, dann gibt sie 
das Programm in hex aus. Um¬ 
gekehrt, geben Sie eine Hex- 
Zahi ein (erkenntlich am $ als 
erstes Zeichen), erhalten Sie 
deren Wert in dezimal. 

Sozusagen noch eine Stufe 
tiefer (noch näher am Compu¬ 
ter) ist das duale Zahlensystem. 
Hier ist die Basis 2, womit in die¬ 
sem System nur die Ziffern 0 


und 1 erlaubt sind. Am einfach¬ 
sten kann man eine Dualzahl in 
dezimal umrechnen, indem 
man sich die Wertigkeit dar¬ 
überschreibt. Hier ein Beispiel: 


Dezimale Wertigkeit 
32 16 8 4 2 1 


Dualzahl 

10 110 1 

Das Ergebnis wäre dann 
32+8+4+1 = 45 
Die Verbindung zum hexade¬ 
zimalen Zahlensystem ist recht 
einfach zu erledigen. Nehmen 
wir an, wir hätten diese Dual¬ 
zahl: 

1010 0101 

Sie sehen schon, ich habe 
sie in Vierergruppen geteilt. Le¬ 
ge ich wieder die Wertigkeit 
darüber, sieht das so aus: 


8421 8421 


1010 0101 


Das ergibt (von links) dezimal 
10 und 5. In hex schreibt man 
für 10 aber A, also hieße die 


A$ = '1' 

WHILE A$ <> " 

IMPUT "Eine Zahl wen hex)'; A$ 

IF LEFT$(A$, 1) <> '$'THEN 
PRINT HEX$(VAL(A$)) 

ELSE 

A$ » RI0HT$(A$, LEN(A$} - 1) 

L « LEN(A$) 

X* * 0 

FOR I»L TO 1 STEP -1 

X* » X* 4 VAL('&h" 4 MID$(A$,I,1)) • 16‘(L-I) 

NEXT I 
PRINT U 
END IF 
WEND 

Listing 1. Üben Sie mit diesem Programm in Amiga-Basic 
die Umwandlung von Dezimal- in Hex-Zahlen 
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Zahl in hex A5. Auch hier wieder 
mit Listing 2 eiti, Amiga-Basic- 
Programm zum Üben von Dual¬ 
zahlen, auch Binärzahlen ge¬ 
nannt. Wenn Sie eine Oezimal- 
zahl eingeben, dann gibt sie 
das Programm in binär aus. 
Umgekehrt, geben Sie eine 
Binär-Zahl ein (erkenntlich am 
% als erstes Zeichen), erhalten 
Sie deren Wert in dezimal. Das 
Zeichen Prozent (%) ist der Prä¬ 
fix für Dualzahlen. 

Der Stack (Stapel) hat eine 
enorme Bedeutung. Ohne ihn 
sind zum Beispiel keine Unter¬ 
programme m^lich. Der Stack 
ist ein Speicher (ein Stück 
RAM) mit besonderen Eigen¬ 
schaften. Man nennt ihn auch 
LIFO für »Last In, First Out« 
oder Stapelspeicher. Sie 
packen Daten auf den Stack, in¬ 
dem Sie etwas auf den Stapel 
tun. Sie können (wie bei einem 
Stapel von Tellern) immer nur 
von oben (vom »Top of Stack«) 
etwas wegnehmen. Wenn Sie 
die Daten A, B und C in dieser 
Reihenfolge auf den Stack 
packen, können Sie sie nur in 
der Folge C, B, A zurücklesen. 

Ganz wichtig: 
der Stack 

Der Trick ist nun, daß die CPU 
tatsächlich niemals die Daten 
vom Stack nimmt, sondern nur 
die Daten woandershin kopiert. 
Gesteuert wird dieses durch 
den sogenannten Stapelzeiger, 
neudeutsch Stackpointer oder 
kurz SR Der Stackpointer zeigt 
immer auf die Spitze des Sta¬ 
pels. SP ist also ein Zeiger, er 
sagt nicht, wie viele Daten auf 
dem Stack sindl Noch eine Vor¬ 
bemerkung: Der Stack wächst 
von oben (den hohen Adres¬ 
sen) nach unten (zu den niedri¬ 
gen Adressen hin). Die Anwei¬ 
sung »Packe A auf den Stack« 
bewirkt zwei Schritte: 

1. Erniedrige SP, 

2. Itopiere A in den Speicher¬ 
bereich, auf den SP nun zeigt. 

Die Umkehr, nämlich hole A 
vom Stack, hat zur Folge: 

1. Kopiere Daten, auf die SP 
zeigt, nach A, 

2. Erhöhe SP. 

Die Daten auf dem Stack 
können auch Adressen sein. 
Ein GOSUB bewirkt nichts wei¬ 
ter, als daß die Adresse des 
dem GOSUB folgenden Be¬ 
fehls auf den Stack gepackt 
wird. Ein RETURN holt diese 
Adresse vom Stack und springt 
dann zum Befehl an dieser 
Adresse. Wird nun in einem Un¬ 
terprogramm wieder GOSUB 
gesagt, sind in diesem Augen¬ 
blick zwei Return-Adressen auf 
dem Stack. Ein RETURN führt 
dann in das Unterprogramm 


zurück, das nächste in das 
Hauptprogramm. 

Daraus folgt auch, daß mit 
dem Stackmechanismus Un¬ 
terprogramme beliebig tief ge¬ 
schachtelt werden können. Je¬ 
des Return erhöht den SP wie¬ 
der und so hangelt man sich 
dann zurück. Aber Achtung, 
was passiert hier? 

10 GOSUB 20 
20 GOSUB 10 

Da jedes GOSUB den SP er¬ 
niedrigt, aber das Gegenstück, 
nämlich das RETURN fehlt, 
wächst der Stack nach unten. 
Er wird dann recht bald in Ihren 
Programm-Code laufen und 
den mit Return-Adressen über¬ 
schreiben. Ergebnis: totaler 
Crash, auch in Basic. Probieren 
Sie es einmal. Die zweite An¬ 
wendung für den Stack ist die 
Parameterübergabe an Unter¬ 
programme. Prinzipiell läuft 
das so: Es gibt in Assembler 
(nicht in Basic) die Befehle 
»Packe Daten auf den Stack« 
und »hole Daten vom Stack«. 
(Sie wissen, jeder Befehl impli¬ 
ziert ein Verändern des Stack- 
Pointers). Da kann ich dann 
sinngemäß schreiben: 

10 A auf den Stack 
20 B auf den Stack 
30 GOSUB 100 

(Return-Adresse auf 
Stack). 

und dann im Unterprogramm: 
100 Hole Return-Adresse 
vom Stack (und 
merke sie) 

110 Hole B vom Stack 
120 Hole A vom Stack 
130 Rechne mit A und B 
l40 Springe zur Return- 
Adresse 

Was aber, wenn Ihr Unterpro¬ 
gramm mit Return enden soll? 
Dann schreibt man: 

1. Return-Adresse auf den 
Stack, 

2. Daten auf den Stack, 

3. GOTO Unterprogramm. 

Im Unterprogramm: 

1. Daten vom Stack, 

2. mit Daten arbeiten, 

3. RETURN. 

Wie schon gesagt: es gibt in 
Assembler keinen PRINT-Be- 
fehl, sondern nur die Möglich¬ 
keit, Bytes in einen Speicherbe¬ 
reich zu schreiben, der (vom Vi¬ 
deo-Controller) auf dem Bild¬ 
schirm abgebildet wird. Über¬ 
haupt heißt Assemblerpro¬ 
grammierung primär, Daten 
von einer Adresse auf eine an¬ 
dere Adresse zu bewegen. 
Auch die Peripherie-Geräte (Ta¬ 
statur, Floppy U.S.W.) liegen 
beim Amiga innerhalb des 
Adreßbereichs (man nennt das 
»memory mapped«). 


Oie Geräte werden ange¬ 
sprochen, indem man be¬ 
stimmte Daten in diese Adres¬ 
sen schreibt oder von Ihnen 
liest. Praktisch werden wir zwar 
die Hardware kaum so anspre¬ 
chen, sondern die Parameter in 
Oatenstrukturen eintragen und 
dann System-Routinen aufru- 
fen, aber auch diese Daten¬ 
strukturen müssen wir adres¬ 
sieren. 

Sie sehen also schon, die 
Adressierung als solche ist 
ganz wesentlich. Man kann ei¬ 
ne Adresse auf sehr viele unter¬ 
schiedliche Arten ansprechen, 
ein Beispiel hatten wir schon 
mit dem SP. Ich kann da sagen, 
stelle den SP auf die Adresse 
4711. Ich kann aber auch sa¬ 
gen, hole Daten von der Adres¬ 
se, auf die SP gerade zeigt (oh¬ 
ne zu wissen, wohin er zeigt). 


Das waren schon zwei Adres¬ 
sierungsarten. Insgesamt 
kennt der 68000 aber deren 
zwölf, und mit diesen zwölf 
Adressierungsarten werden wir 
uns gleich beschäftigen, doch 
zuerst müssen Sie die Register 
kennenlernen. 

Bisher wissen wir, daß Daten 
im RAM oder ROM stehen. Da¬ 
neben gibt es aber ein ganz 
spezielles RAM, der ein Teil der 
CPU ist. Dieser Speicherbe¬ 
reich besteht aus Gruppen von 
je 32 Bit und jede dieser Grup¬ 
pen nennt man Register. Die 
Register werden nicht über 
Adressen, sondern über Na¬ 
men angesprochen. Der Vorteil 
von Registern im Vergleich zum 
übrigen Speicher ist, daß sich 
die Register auf demseiben 
Chip wie die CPU befinden, 
und die CPU den Zugriff auf 


diese Register durch spezielle 
Befehle unterstützt. 

Natürlich entfällt auch der 
Transport vom Speicher zur 
CPU. Damit sind Registerope¬ 
rationen wesentlich schneller 
als Zugriffe auf den Hauptspei¬ 
cher und bieten (wegen der 
speziellen Befehle) einiges 
mehr an Itomfort. 

So gesehen ist eine CPU mit 
vielen Registern besser, als ei¬ 
ne mit wenigen. Der 68000 hat 
viele Register, nämlich: 8 Da¬ 
tenregister, 7 Adreßregister, 2 
Stackpointer, einen Programm¬ 
zähler (PC) sowie ein Statusre¬ 
gister. Tabelle 1 zeigt den kom¬ 
pletten Registersatz des 68000. 

Wie Sie sehen, sind die Regi¬ 
ster D0-D7 und A0-A7 plus PC 
je 32 Bit breit. Im Bild sind die 
Bits von 0 bis 31 numeriert. Das 
sind 4 Byte. 


In einem Byte zählt man die 
Bits von 0 (niederwertiges Bit) 
bis 7 (höchstwertigtes Bit). 

Zwei Bytes (16 Bit) nennt man 
Wort. Dessen Bits zählen von 0 
bis 15. Zwei Worte (32 Bit) sind 
ein Langwort. Man spricht auch 
von den Datentypen Bit, Byte, 
Wort und Langwort. Die größten 
darstellbaren Zahlen in Abhän¬ 
gigkeit vom Typ zeigt diese Li¬ 
ste: 

Bit = 21 1-1 = 1 
Byte = 2f 8-1 = 255 
Wort = 2tl6-l = 65.535 
Langwort = 21 32-1 = 

4.294.967.299 
In den Datenregistern kann 
man Bytes, Worte und Lang¬ 
worte ablegen. 

Bei den Adreßregistern ist 
der Typ Byte nicht möglich. Die 
Stackpointer (A7) sind immer 


31 


15 


SystMD Us«r 


DO 


Dl 


D2 

Döten- 

D3 

Register 

D4 


D5 


D6 


D7 


AO 


Al 


A2 

Adreß- 

A3 

Reglster 

A4 


A5 


A6 


A7 

User Stack-Pointer 

A7' 

Supervisor-SP 

PC 

Program Counter 

SR 

Status-Register 


Tabelle 1. Alle Register des 68000-Prozessors 
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Kurse 


»long«. Außerdem gibt es noch 
den Type BCD (Binary Coded 
Decimal). In diesem Falle wird 
ein Byte in zwei Halbbytes 
(nennt man Nibble) geteilt. Mit 
den 4 Bit eines Nibbles kann 
man nun die Zahlen 0 bis 15 
darstellen. Auf 10 bis 15 wird da¬ 
bei aber verzichtet, gültig sind 
in der BCD-Darstellung nur die 
Werte von 0 bis 9. Damit kann 
man in einem »BCD-Byte« im¬ 
mer zwei Zehner-Stellen dar¬ 
stellen. Ein Wort reicht also für 
eine vierstellige Dezimalzahl. 
Benötigt man mehr Stellen, 
muß man die entsprechende 
Anzahl Bytes sozusagen ne¬ 
beneinanderlegen. Nun gibt es 
eine Unmenge kluger Algorith¬ 
men zum Thema BCD-Rechne- 
rei. Für die armen Leute ohne 
68000 sind die sehr wichtig. Wir 
können darauf verzichten, weil 
im 68000 die passenden Befeh¬ 
le dafür schon eingebaut sind. 

Solange Sie nur mit Regi¬ 
stern arbeiten, spielt die Größe 
(fast) keine Rolle, wenn Sie aber 
ein mit allen 32 Bit gefülltes Re¬ 
gister in den RAM kopieren, be¬ 
legt es da 4 Byte. Das ist ziem¬ 
lich unpraktisch, weil Sie sehr 
oft mit Bytes oder Worten aus- 
kommen könnten, also auch mit 
weniger Speicher. Deshalb gibt 
es beim 6800 die Möglichkeit - 
genau: die Pflicht - bei jeder 
Operation, die Daten bewegt, 
anzugeben, welcher Typ dabei 
gilt. 

Ein Beispiel: Der Datentrans¬ 
fer geschieht mit dem Befehl 
MOVE, und zwar mit der Syntax 
»MOVE Quelle,Ziel«. Tatsäch¬ 
lich bewegt der Befehl MOVE 
die Daten nicht, sondern ko¬ 
piert sie, er kopiert von der 
Quelle auf das Ziel. Um die Da¬ 
ten im Register D3 auf die 
Adresse 4711 zu kopieren, 
schreibt man: 

MOVE.B 03,4711 

oder 

MOVE.W 03,4711 
oder 

MOVE.L 03,47711 

Im Falle «.B« wird ein Byte ko¬ 
piert, also die Bit 0-7 von D3, im 
Fall ».W« ist es ein Wort (Bit 
0-15), im Fall ».L« das ganze Re¬ 
gister. Im Hauptspeicher (hier 
ab Adresse 4711) werden dann 
entsprechend 1, 2 oder 4 Byte 
belegt. In welcher Reihenfolge 
dabei die verschiedenen Da¬ 
tentypen im RAM stehen, soll¬ 
ten Sie wissen, nämlich so, wie 
man sich das denkt. 

Steht beispielsweise in DO 
das Wort $AABB und wird DO 
mit einem Move.W-Befehl auf 
die Adresse 1000 kopiert, so 
steht $AA in 1000 und $BB in 
1001. Nur den Kollegen aus der 


8-Bit-Ecke und denen, die vom 
IBM-PC kommen, sei noch ein¬ 
mal deutlich gesagt: Der 68000 
speichert Daten in der richtigen 
Reihenfolge. Es werden nicht - 
wie bei den »8-Bitern/8086ern« 

- die Bytes eines Wortes ver¬ 
tauscht. 

Wegen dieser freien Auswahl 
des Datentyps haben Sie auch 
die Pfiicht, ihn bei den meisten 
Befehlen anzugeben. Fehlt der 
Typ, nehmen die meisten As- 
sembier den Typ Wort an. 

Um auf die Register zurück¬ 
zukommen: Der Hauptunter¬ 
schied zwischen Daten- und 
Adreßregistern ist, daß bei ietz- 
teren die Typen Bit und Byte 
nicht erlaubt sind. 

Ansonsten können Sie 
durchaus auch Daten in Adreß¬ 
registern speichern und Adres¬ 
sen in Datenregistern. Letzte¬ 
res werden wir beim Amiga 
häufig antreffen, da viele Routi¬ 
nen auch Adressen in Datenre¬ 
gistern erwarten. 

Das Statusregister hat einen 
ganz besonderen Zweck. Da¬ 
mit wird in Assembler IF-THEN 
realisiert, ich komme später 
noch (sehr ausführlich) darauf 
zurück. 

Wieviel Assembler-Befehle 
es gibt, ist gar nicht so einfach 
zu sagen. Je nach Zählweise 
können es 56 oder 1000 sein. 
Das liegt daran, daß ein Befehl 
je nach Adressierungsart (und 
weiteren Varianten) ganz unter¬ 
schiedliche Wirkung zeigt. Be¬ 
ginnen wir mit dem Befehlsauf¬ 
bau. Ein Befehl kann haben: 
keinen Operanden, einen oder 
zwei. Die Operanden können 
im Befehlswort selbst enthalten 
sein oder belegen bis zu vier 
weitere Worte, die dem Befehls¬ 
wort unmittelbar folgen. Dar¬ 
über brauchen Sie sich aber 
vorerst wenig Sorgen zu ma¬ 
chen. Im Quelltext schreiben 
Sie den Befehl und die Operan¬ 
den einfach hin, wieviel Worte 
das dann werden, ist Sache des 
Assembiers. 

Adressierung 
ist ailes 

Ein Beispiel für einen Befehl 
ohne Operanden ist RTS (Re¬ 
turn from Subroutine), was dem 
RETURN in Basic entspricht. 
Einen Operanden hätte der Be¬ 
fehl »CLR DO«. Das heißt: Lö¬ 
sche (Ciear, fülle mit Nullbits) 
den Operanden DO (das Regi¬ 
ster DO). 

Ein Beispiei für einen Befehl 
mit zwei Operanden: 

MOVE.L A3,A4 

Damit wird das Langwort im 
Register A3 nach A4 kopiert. 
Eine CPU ist um so besser, je 


mehr sinnvoile Adressierungs¬ 
arten sie hat. Hier glänzt der 
68000 ganz besonders. Dieser 
Luxus macht die Sache zwar 
auch etwas schwierig, denn 
das alles will gelernt sein. Dies 
stellt auch eine Barriere für die 
Kollegen dar, die gewohnt sind, 
mit den wenigen (und primiti¬ 
ven) Adressierungsarten der 
»8-Biter« auszukommen. Ande¬ 
rerseits, wenn Sie dieses The¬ 
ma beherrschen, dann beherr¬ 
schen Sie auch den 68000. 

Um zu zeigen, worum es 
geht: Im Beispiel von eben 


(MOVE.L A3,A4) wurde der In¬ 
halt des Registers A3 nach A4 
kopiert. Schreibe ich hingegen 

MOVE.L (A3),(A4) 

heißt das, daß die Inhalte der 
Register als Adressen zu sehen 
sind. Hat beispielsweise im Mo¬ 
ment des Befehls A3 den Wert 
4711 und A4 ist gleich 5711, 
dann wird ein Langwort von 
Adresse 4711 (da startend und 
Byte für Byte) nach Adresse 
5711 kopiert. 

Wir haben nun schon zwei 
Adressierungsarten kennenge¬ 
lernt, nämlich »Register direkt« 
(MOVE.L A3,A4) und »Register 
indirekt« (MOVE.L (A3),(A4)). 
Um noch eine Stufe höherzu¬ 
gehen, schauen wir uns 
»Adreß-Register indirekt mit 
Postinkrement« an. Das sieht 
beispieisweise so aus: 

MOVE.W (A0)+,D0 

Im Klartext: Kopiere das 
Wort, auf das AO zeigt, nach DO 
und erhöhe danach (post) AO 
um 2. Zwei deshalb, weil ein 
Wort 2 Byte hat. Bitte merken: 
Der 68000 ist eine Byte-Maschi¬ 
ne, jede Adresse zeigt auf 1 By¬ 
te. »MOVE.L (AO)-i-,DO« würde 
ein Langwort kopieren und da¬ 
nach AO um 4 inkrementieren. 
Die nächste Variante wäre 
»Adreßregister indirekt mit Pre- 
dekrement. Ein Beispiel: 

MOVE.L D0,-(A5) 


In diesem Falle wird vorab 
(pre) 4 (Langwort hat 4 Byte) 
von A5 subtrahiert, dann wird 
DO dahin kopiert, wohin A5 nun 
zeigt. 

Das hatten wir doch schon 
mal? Denken Sie an das The¬ 
ma Stack. Daten werden auf 
den Stack gebracht, indem 
man den Stackpointer (SP) er¬ 
niedrigt und dann die Daten auf 
die Adresse kopiert, auf die SP 
zeigt. Daten werden vom Stack 
geholt, indem man sie von der 
Adresse holt, auf die SP zeigt 
und dann SP erhöht. Das wäre 


dann unser schon bekanntes 
MOVE.L (A5)+,D0 

Tatsächlich kann man so je¬ 
des Adreßregister als Stack¬ 
pointer einsetzen. 

Die Besonderheit des Regi¬ 
sters A7, das auch in vielen As¬ 
semblern SP heißt, liegt darin, 
daß dieses Register auch durch 
Befehle wie JSR (Jump to Sub¬ 
routine) und RTS (Return) an¬ 
gesprochen wird. Man kann 
aber auch das mit anderen Re¬ 
gistern erledigen, zum Beispiel 
kann man anstatt des Befehls 
RTS auch schreiben: 

MOVE.L (A7)+,A0 
JMP (AO) 

Der MOVE-Befehl holt die 
Return-Adresse vom Stack in 
das Register AO, danach erfolgt 
ein Sprung (Jump) zur Adresse, 
auf die AO nun zeigt. Sie sagen, 
warum der Umstand, ein RTS 
ist doch viel einfacher! Recht 
haben Sie, aber trotzdem wer¬ 
den Sie diese Lösung in Pro¬ 
grammen sehen, die beispiels¬ 
weise von Basic aus aufgerufen 
werden, und zwar so: 

MOVE.L (A7)+, 4711 

(viele andere Befehle) 

MOVE.L 4711,A0 
JMP (AO) 

Mit dem ersten MOVE-Befehl 
wird die Return-Adresse auf ei¬ 
nen sicheren Platz in den RAM 


a$ = '1' 

WHIU a$ <> " 

INPUT 'Eine Zahl n (.%Ti wenn binär) 'j a$ 

IF LEFT$(a$, 1) <> THEN 
X* » VAL(a$) 

FOR 1 = 15 TO 0 STEP -1 
PRINT SGN(x* AND 2 ■ 1){ 

NEXT: PRINT 
ELSE 

a$ . RIGHT${a$, LEN(a$) - l) 

1 • LEN(a$): X* « 0 
FOR 1 » 1 TO 1 STEP -1 

X* » X* + VAL('&h" + MID$(a$,i,l)) » 2*(l-i) 

NEXT 
PRINT X* 

END IF 
WEND 

LIsting 2. Dual- In Dezimalzahlen wandelt dieses 
Basic-Programm 
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geholt (4711 ist hier nur symbo¬ 
lisch gemeint). Man sagt auch 
die Return-Adresse wird geret¬ 
tet. Wenn irgend etwas schief 
geht, kann ich dann immer 
noch mit Hilfe dieser Adresse 
zu Basic zurück, egal wo der 
Stackpointer gerade steht. 

Nach diesem Ausflug in die 
Praxis, der einmal andeuten 
sollte, wofür man verschieden¬ 
artige Adressierungsarten 
braucht, wieder zurück zur 
Theorie. Tabelle 2 zeigt eine Li¬ 
ste aller Adressierungsarten 
und noch etwas mehr. 

Zuerst notieren Sie bitte nur, 
daß eine Adresse aus mehreren 
Angaben zusammengesetzt 
sein kann. Die CPU errechnet 
daraus die endgültige Adresse, 
auch effektive Adresse (ea) ge¬ 
nannt. Wie Sie schon wissen, 
belegt das Befehlswort 16 Bit. 
Die vier höherwertigsten davon 
beschreiben den Befehl an 
sich. Die übrigen zwölf teilen 
sich in zwei Gruppen von je 6 
Bit, die die Adressierungsart 
von Ziel und Quelle (so vorhan¬ 
den) angeben. Die 6 Bit je Ope¬ 
rand wiederum teilen sich in 
zwei Gruppen von je 3 Bit. Die 
eine Gruppe heißt Modus, die 
zweite Register. Mit 3 Bit sind 
die Zahlen 0 bis 7 darstellbar, 
deshalb gibt es auch die Regi¬ 
ster AO bis A7 und DO bis D7. Es 
gibt aber mehr als sieben 
Adressierungsarten. Das wird 
damit erreicht, daß nicht bei je¬ 
dem Adressier-Modus alle Re¬ 
gister erlaubt sind. Überhaupt 
sind bestimmte Adressierungs¬ 
arten nicht für den Quell- und 
(gleichzeitig) den Zieloperan¬ 
den erlaubt und außerdem 
auch nicht für jeden Befehl. Es 
ist wichtig, diese Einschränkun¬ 
gen genau zu kennen. 

Wir hatten schon gesehen, 
daß in den einzelnen Bits eines 
Befehlswortes codiert ist, wel¬ 
che Daten dazugehören. Um 
das aufzuzeigen, wurde in Ta¬ 
belle 2 der Modus und die Regi¬ 
ster-Nummer als Binärzahlen 
dargestellt. Steht dort »An« oder 
»Dn«, können Sie dafür %000 
bis %111 (dezimal 0 bis 7) ein- 
setzen. 

Adressierungs¬ 
arten im Detail 

Wie Sie sicher erkannt ha¬ 
ben, geht aus dem Befehlswort 
und den darin codierten Adres¬ 
sierungsarten auch hervor, wie¬ 
viele Worte der Befehl Im Spei¬ 
cher belegt. Register-Register- 
Adressierung (z.B. MOVE 
A0,A1) kommt mit einem Wort 
aus, geben Sie hingegen eine 
absolute Adresse an, kommt 
mindestens noch ein Wort hin¬ 
zu. In den 16 Bit des Befehls¬ 


wortes stecken alle Informatio¬ 
nen, die die CPU benötigt, um 
den Befehl zu decodieren. 

Ähnlich arbeiten auch soge¬ 
nannte Disassembler. Das sind 
Programme, die aus dem Ma¬ 
schinencode wieder den Klar¬ 
text der Assemblersprache bil¬ 
den. Solange Sie aber ein sol¬ 
ches Programm nicht schrei¬ 
ben wollen, können (und soll¬ 
ten) Ihnen diese Bitmuster 
herzlich egal sein. Es gibt viele 


Hacker, die den Hex-Code (die 
Maschinensprache) der »8- 
Bitter« lesen können, wie ande¬ 
re Leute die Zeitung. Diese 
Übung ist beim 68000 aus¬ 
sichtslos, also sehen wir die Sa¬ 
che von der praktischen An¬ 
wendung her, nämlich alle 
Adressierungsarten an je ei¬ 
nem Beispiel. 

1. Register direkt 

Eines der Register wird direkt 
angesprochen. Beispiel; 

CLR DO (Lösche DO) 

2. Adreßregister Indirekt (ARI) 
Der Inhalt des Registers ist 

eine Adresse, auf diese wirkt 
die Operation. Beispiel: 

MOVE (A0),D0 ;ARI 
(bitte merken!) 

Das Wort, dessen Adresse in 
AO steht, wird nach DO kopiert. 

3. ARi mit Postinkrement 
Wirkt wie ARI, nur wird an¬ 
schließend das Register inkre- 
mentiert. Beispiele: 

MOVE.B (A0)+,D0 ; 

Kopie,dann A0=A0+1 
MOVE.W (AO)+,DO ; 

Kopie,dann A0=A0+2 
MOVE.L (A0)+,D0 ; 

Kopie,dann A0=A0+4 

4. ARI mit Predekrement 
Wie ARi mit Postinkrement, 

nur wird das Register vor der 
Operation erniedrigt. Beispiel: 
MOVE -(AO), DO ; 

A0=A0-2, dann Kopie 

5. ARI mit Adreßdistanz 

Die effektive Adresse ist die 
Summe von Inhalt des Regi¬ 
sters plus Adreßdistanz. Die 
Adreßdistanz ist eine vorzei¬ 


chenbehaftete 16-Bit-Zahl im 
Bereich -32668...32767. Ein Bei¬ 
spiel; 

MOVE -IOO(AO), DO 

Wäre A0=500, würde das 
Wort von Adresse 400 nach DO 
kopiert. Diese Adressierungs¬ 
art sollten Sie sich gut merken! 
Beim Amiga werden wir diese 
sehr häufig brauchen. 

6. ARI mit Adreßdistanz und 
Index 


Nun wird es kompliziert. Die 
Adreßdistanz ist jetzt nur noch 
eine vorzeichenbehaftete 8-Bit- 
Zahl im Bereich von -128...127. 
Nun darf aber noch ein weiteres 
Register angegeben werden. 
Beispiel: 

MOVE 100(AO,DO),4711 

100 ist die Adreßdistanz, AO 
enthält die Basisadresse, in DO 
steht der Index. Alle drei wer¬ 
den addiert. Die Summe ist ei¬ 
ne Adresse, das Wort (Byte, 
Langwort), das dort steht, wird 
ins Ziel (hier Adresse 4711) ko¬ 
piert. Beim Index darf auch ein 
anderer Typ angegeben wer¬ 
den, also auch DO.B oder DO.L 
wären erlaubt, bei Adreßregi¬ 
stern als Index natürlich nur 
An.W und An.L (0< n < 7). Auch 
der Index ist vorzeichenbehaf¬ 
tet, womit er im Falle Langwort 
im Bereich von 2 GByte liegen 
muß (wenn wir die mal hätten). 
Dieser Befehl ist ideal für die 
Abarbeitung von Tabellen und 
Arrays. Oft wird dabei die 
Adreßdistanz nicht benötigt (die 
Laufvariable steht im Indexregi¬ 
ster), weshalb man zum Bei¬ 
spiel oft die Form »0(A3,D4. 
L)« sieht. 

7. Absolute Adressierung 

Dies ist der einfachste Fall. 
Beispiel: 

MOVE 4711,5713 

Das Wort von Adresse 4711 
und4712wird auf Adresse 5713/ 
14 kopiert. Die CPU unterschei¬ 
det dabei noch zwischen kurz 
und lang (Adreßbereich nur 64 
KByte oder die vollen 16 MByte 
des 68000). Praktisch merken 


Sie den Unterschied kaum (die 
lange Adresse erfordert mehr 
Bytes in der Befehlslänge und 
ist etwas langsamer). 

8. Konstanten-Adressierung 

Auch wieder etwas ganz Ein¬ 
faches. Um eine l^nstante zu 
bewegen, brauchen Sie nur 
das Zeichen # vorzusetzen. 
Um beispielsweise das ASCII- 
Zeichen Ä in das Register DO zu 
laden, schreiben Sie: 

MOVE #65, DO 

oder 

MOVE #'A',D0 

9. PC-relatlv 

Da muß ich etwas ausholen, 
damit Sie dieses Feature auch 
würdigen können. Sobald Sie in 
einem Assembler-Programm 
eine absolute Adresse ange¬ 
ben, ist das Programm an einen 
Ort im Speicher gebunden. 
Auch z.B »(AO)« (indirekt) ist in 
diesem Sinne absolut, denn 
vorher mußten Sie ja AO mit ei¬ 
ner Adresse versorgen. 

Der von Ihnen vorgesehene 
Adreßbereich kann aber schon 
belegt sein, also muß Ihr Pro¬ 
gramm auch an einem anderen 
Ort laufen können. Dafür gibt es 
zwei Möglichkeiten. Erstens, 
das Programm ist verschiebbar 
(relokatibel). Dafür sorgt der As¬ 
sembler, indem er mit dem Pro¬ 
gramm eine Tabelle aller abso¬ 
luten /Pressen speichert. Der 
Lader (oder das Programm 
selbst oder ein Utility) kann 
dann diese /^ressen korrigie¬ 
ren, indem sie die Differenz zwi¬ 
schen geplanter und tatsächli¬ 
cher Start-Adresse auf alle ab¬ 
soluten Adressen Tabelle ad¬ 
diert. Die zweite Möglichkeit ist, 
das Programm lageunabhän- 
gig (Position Independent) zu 
schreiben. In einem solchen 
Programm dürfen dann eben 
keine absoluten Adressen Vor¬ 
kommen, und genau da hilft der 
68000 mit der PC-relativen 
Adressierung. Dabei wird die 
Adresse gerechnet als aktueller 
Stand des PC+Offset. Offset ist 
auch hier wieder auf -32768... 
32767 begrenzt. Beispiel: 

MOVE 100(PC),DO 

10. PC-relativ mit Adreßdi¬ 
stanz und Index 

Hier gilt sinngemäß das für 
»ARI mit Adreßdistanz und In¬ 
dex« Gesagte, nur daß die 
Basis-Adresse hier PC-i-2 ist. 
Beispiel: 

MOVE 100(PC,A0.W),D0 

Wie schon gesagt, ohne gute 
Kenntnisse des Betriebssy¬ 
stems ist Assemblerprogram¬ 
mierung nicht möglich, also 
packen wir’s an. 

Das Betriebssystem des Ami¬ 
ga besteht grob vereinfacht aus 
drei Teilen, nämlich aus 


Adressierungsarten des 



Adressierungsart 

Kürzel 

Modus 

Register 

Datenregister direkt 

Dn 

000 

Dn 

Adreßregister direkt 

An 

001 

An 

Adreßregister indirekt (ARI) 

(An) 

010 

An 

ARI mit Postinkrement 

(An)+ 

011 

An 

ARI mit Predekrement 

-(An) 

100 

An 

ARI mit Adreßdistanz 

d16(An) 

101 

An 

wie vor plus Index 

d8{An,Rg) 

110 

An 

Absolut kurz 

sxxxx 

111 

000 

Absolut lang 

$XXXXXXXX 

111 

001 

PC-Relativ mit Adreß-Oistanz 

d16(PC) 

111 

010 

wie vor plus Index 

d8{PC,Rn) 

111 

011 

Konstante, Statusregister 

#,SR,CCR 

111 

100 


Tabelle 2. Alle Adressierungsarten auf einen Blick 
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-DOS, 

- Intuition, 

- Exec. 

Oie Aufgabe eines jeden OS 
(Operating System) ist es, die 
Verbindung des Computers mit 
der Außenwelt herzustellen. 
Dinge wie Zeichen von der Ta¬ 
statur lesen, Zeichen auf dem 
Bildschirm darstellen oder Da¬ 
teien von einer Diskette lesen 
sind typische Aufgaben des 
OS. 

Nun kann der Amiga be¬ 
kanntlich wie ein Standard- 
Computer bedient werden (Sie 
tun das, wenn Sie im CLI sind) 
oder über die grafische Benut¬ 
zeroberfläche »Workbench«. 
Immer noch ganz grob (genau¬ 
er behandeln wir das später) 
kann man nun sagen 

- Standard = DOS, 

- Grafik = Intuition. 

Bliebe noch Exec, und das ist 

in unserem vereinfachten Mo¬ 
dell primär für das Multitasking 
zuständig. 

Das DOS (Disk Operating Sy¬ 
stem) hat auch etwas mit Dis¬ 
ketten zu tun, doch der Name 
untertreibt. 

Tatsächlich kann das DOS 
auch mit der Tastatur und dem 
Bildschirm umgehen, ja sogar 
typische Amiga-Windows öff¬ 
nen, den Drucker bedienen und 
einiges mehr. Weil das DOS 
recht einfach zu handhaben ist, 
werden wir uns vorerst nur da¬ 
mit beschäftigen. Schließlich 
müssen Sie zuerst die Assem¬ 
bler-Programmierung an sich 
lernen, was schon Stoff genug 
ist. Sie gleichzeitig noch mit 
den komplizierten Teilen der 
Amiga-System-Software zu be¬ 
helligen, verkneife ich mir des¬ 
halb (aber nur vorerst). 

Der Schlüssel 
zum Amiga 

Aus Sicht des Programmie¬ 
rers ist das DOS eine Samm¬ 
lung von Routinen (Unterpro¬ 
grammen), die er alle benutzen 
darf. Jedes dieser Unterpro¬ 
gramme startet natürlich bei ei¬ 
ner bestimmten Adresse, und 
demnach könnte man so ein 
Programm in der R)rm »JSR 
Adresse« aufrufen. Praktisch 
tut man das nicht, denn dann 
würde jede Änderung im OS 
dazu führen, daß sich einige 
oder alle dieser Adressen ver¬ 
schieben und somit alle »alten« 
Programme nur noch Makula¬ 
turwären. Deshalb gibt es eine 
Tabeile, in der die Startadres¬ 
sen aller Unterprogramme no¬ 
tiert sind. 

Ändert sich ein UP und ver¬ 
schiebt damit sich (und andere) 
im Speicher, wird nur die Tabel¬ 
le geändert. Wenn Sie also im¬ 


mer schön jedes Unterpro¬ 
gramm mittels dieser Tabelle 
aufrufen, werden Ihre Program¬ 
me unter jeder Workbench und 
mit jedem Kickstart laufen, an¬ 
sonsten garantiere ich für gar 
nichts. 

Beim Amiga sind diese Un¬ 
terprogramme nicht alle »auf ei¬ 
nem Haufen« abgelegt, son¬ 
dern in Gruppen sortiert, die 
man Libraries (Bibliotheken) 
nennt. 

Eine Library ist vereinfacht 
ausgedrückt eine Sammlung 
von Unterprogrammen mit der 
zugehörigen Tabelle (je Unter¬ 
programm ein Eintrag). Für je¬ 
den Zweck (zum Beispiel DOS, 
Intuition, Grafik) gibt es eine ei¬ 
gene Library. 

Will man eine Funktion einer 
Library benutzen, muß man die 
Library mit »OpenUbrary« öff¬ 
nen. Diese Funktion gibt einen 
Zeiger auf den Beginn (die 
Startadresse) der Tabelle zu¬ 
rück. Um nun ein Unterpro¬ 
gramm aufrufen zu können, 
muß man die Startadresse der 
Tabelle angeben und ein soge¬ 
nanntes Offset, das die Diffe¬ 
renz zwischen Startadresse 
und zugehörigem Tabellenplatz 
ist. 

Verwaltet wird das Ganze 
vom sogenannten Library- 
Manager (ein Teil von Exec). 
Der Manager weiß, ob sich eine 
Library schon im ROM oder 
RAM befindet. Wenn nicht, ver¬ 
sucht er, die Library von der Dis¬ 
kette zu laden. 

Klappt das nicht (Library ist 
nicht auf der Diskette oder 
Speicher ist schon voll), gibt er 
0 als Adresse zurück. 

Der Umstand hat noch einen 
Grund: Wir haben einen Amiga 
und der unterscheidet sich von 
seinen Konkurrenten auch 
durch sein Multitasking-System. 
Das heißt vereinfacht (kommt 
auch noch genauer), daß gleich¬ 
zeitig verschiedene Tasks (Pro¬ 
gramme) eine Library benutzen 
können. 

Der erste Task wird die Libra¬ 
ry notfalls von der Diskette in 
das RAM laden (genau: das La¬ 
den veranlassen). Öffnen wei¬ 
tere Tasks dieselbe Library, wird 
der Manager nur noch die 
Adresse an diese Tasks mel¬ 
den. 

Daraus folgt: Eine Library 
darf erst wieder aus dem Spei¬ 
cher gelöscht werden, wenn 
der letzte Task gemeldet hat, 
daß er sie ab sofort nicht mehr 
benötigt. Dafür gibt es die 
Funktion »CloseUbrary«. Jeder 
Task (also jedes Programm, 
das Sie schreiben) muß des¬ 
halb alle Libraries, die er geöff¬ 
net hat, auch wieder schließen. 
Andernfalls wird schnell der 


Speicherplatz knapp werden. 
Jedes Assemblerprogramm be¬ 
steht aus den Feldern Marke, 
Befehle, Operanden (falls vor¬ 
handen) und Kommentar. 

Hier ein Muster: 

Der Kommentar muß nicht 


sein, trägt aber zur Lesbarkeit 
des Programms bei. 

Je nach Assembler muß er 
mit einem Semikolon oder 
Stern beginnen, bei manchen 
Assemblern reicht auch der 
Platz (Kommentarfeld). 

Steht der Kommentar allein 
in einer Zeile, muß »;« oder »•« 
sein. 

Die Marke (Label) wird nur in 
einigen Fällen gebraucht. Sie 
kann auch allein in einer Zeiie 
stehen, wirkt aber immer auf 


die nächste Zeiie mit einem Be¬ 
fehl. In manchen Assemblern 
muß der Marke ein Doppel¬ 
punkt folgen; dann aber nur, 
wenn sie im Markenfeld steht, 
nicht wenn sie angesprochen 
wird. 


Ausgenommen die Sonder¬ 
fälle nur Marke oder nur Kom¬ 
mentar muß ein Befehl in einer 
Zeile stehen, und, so vorhan¬ 
den, auch dessen Operand(en). 
Die Felder müssen durch min¬ 
destens eine Leerstelle vonein¬ 
ander getrennt sein. Meistens 
benutzt man die Tabulator-Ta¬ 
ste (Ster Abstand). Nehmen Sie 
aber einen Texteditor, der dafür 
Blanks erzeugt. 

Nun zu unserem ersten Pro¬ 
gramm (Listings 3a bis 3c). Nur 


» AUIet Mein erstes Progranira (Metacomco-Vers.) 

INCLUDE 

'llbraries/dos.lib.1 * 


XREF 

JXJSBase 


XREF 

.SysBase 


XREF 

_LV00penLibrary 


XREF 

_LVOCloseLibrary 


XDEF 

jnaln 


jaaln move.l 

#dosname,al 

jName der DOS-Llb 

Rtoveq 

#0,d0 

:Verslon egal 

move.l 

_Sy8Base,a6 

;Basls Exec 

Jsr 

_LV00penLibrary(a6) 

;DOS-Llb oeffnen 

tat.l 

dO 

{Fehler? 

beq 

flnl 

jwenn Fehler, dann Ende 

move.l 

dO,JX)SBase 

{merke Zeiger 

» Ausgabe-Handle ermitteln: 


move.1 

_D0S6aee,a6 

jDOS-Funktion rufen 

Jsr 

_LV00utput(a6} 

{Hole Output-Handle 

move.1 

d0,d4 

{und in d4 merken 

* nun Text ausgeben: 


move.1 

d4,dl 

{Ausgabe-Handle 

move.l 

#strlng,d2 

{Adresse Text 

moveq 

#20,ij 

{Laenge Text 

move.1 

_D0SBase,a6 

{Basis DOS 

jsr 

_LV0Wrlte(a6) 

{Funktion 'Schreiben' 

* Zum Schluss immer die Lib schliessenl 

move. 1 

JX)SBase,al 

{Basis d. Lib 

move. 1 

_SysBase,a6 

{Basis Exec 

Jsr 

_XVOCloseLibrary(a6) 

{Funktion 'Schilessen' 

flnl rts 


{Return zum CLI 

* Datenbereich: 



dosname dc.b 

’dos.llbrary',0 
cnop 0,2 


String dc.b 

'Hallo lieber Leserl', 
cnop 0,2 

10 

end 



Listing 3a. Das erste Assembler-Programm 

(Metacomco-Version) 



Marke 

Befehl 

Operand(en) 

Kommentar 

Start 

cir 

dO; 

Lösche Register 


move 

dO,dT, 

Befehl mit 2 Operanden 

weiter 

rts 

kein Operand 

;nur Marke in der Zeile 
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zur Einführung steile ich Ihnen 
das üsting dreimal (für die As¬ 
sembler Metacomco, SEKA 
und DevPac) vor. Alle weiteren 
Listings gelten für den DevPac- 
Assembler von HiSoft. Die Le¬ 
ser mit den anderen Assem¬ 
blern sollten' anhand ihrer 
Handbücher und der hier gege¬ 
benen Hinweise in der Lage 
sein, die Listings anzupassen. 
Beginnen wir mit Metacomco, 
der nach der klassischen Me¬ 
thode arbeitet. 

Das Programm soll schlicht 
aber herzlich »Hallo lieber Le¬ 
ser« auf den Schirm schreiben 
und dann zum CLI zurückkeh¬ 
ren, Vergessen wir vorerst den 
Kopf (Overhead) und betrach¬ 
ten das Listing ab der Zeile, die 
mit »_main« beginnt. 

Auch für das simpelste Pro¬ 
gramm müssen wir eine Library 
öffnen. Dazu brauchen wir die 
Funktion Openübrary, die 
selbst in der Exec-Library zu fin¬ 
den ist. Wir brauchen aber 
auch immer zu jeder Funktion 
die Basis-Adresse der Library, 
und auch die erhält man mit 
OpenLibrary. Damit sich die 
Katze nun nicht in den Schwanz 


beißt, gibt es im Amiga eine fe¬ 
ste Adresse (die einzige!), und 
das ist die Basis von Exec. Die¬ 
se Adresse (4) hat den symbo¬ 
lischen Namen »_AbsExec 

Base« oder (hier benutzt) 

»_SysBase«. Der Schlüssel 

steckt in diesen Zeilen: 
move.l _SysBase,a6 j 
Basis Exec 

j sr _LVOOpenLibrary 

(a6) ;D0S-Lib oeffnen 

Im Klartext: Lade das Regi¬ 
ster a6 mit der Konstanten 

»_SysBase«. Dann springe 

zum Unterprogramm (JSR = 
Jump to Sub Routine), dessen 
Adresse sich aus der Konstan¬ 
ten »_LVOOpenübrary« und 

dem Register a6 berechnet. 

Vorher müssen wir aber noch 
sagen, welche Library geöffnet 
werden soll. Dazu müssen zwei 
Parameter übergeben werden, 
nämlich der Name der Library 
und die Versionsnummer. Das 
erledigen die Zeilen 
_main raove.1 # 

dosname,al ;Name der 
DOS-Lib 

moveq # 0,dO ; 

Version egal 


Die erste Zeile heißt: Kopiere 
(move) die Adresse von »dosna- 
me« in das Register a1. Das 
Doppelkreuz ist von immenser 
Bedeutung. Es heißt hier näm¬ 
lich »Adresse von«. Vergessen 
Sie dieses Zeichen, gibt es ei¬ 
nen bildschönen Absturz, denn 
dann heißt es »Inhalt von«. 
Bleibt noch die Versionsnum¬ 
mer. Es kann Libraries geben, 
die sich nicht im Namen aber in 
der Versionsnummer unter¬ 


scheiden. Nur die Version 0 gibt 
es nie. Null ist reserviert für 
»nehme die erste (meistens die 
einzig vorhandene) Version«. 
Nach dem JSR kehrt das Unter¬ 
programm zurück, und im Regi¬ 
ster dO steht die Basisadresse 
der DOS-Library. Diese Adres¬ 
se wird sofort in der Variablen 
»_DOSBase« gesichert. 


Wir haben nun die Adresse 
der DOS-Library ermittelt und 
können damit arbeiten. Um ei¬ 
nen Text ausgeben zu können, 
müssen wir zuerst wissen, wo¬ 
hin der Text geschrieben wer¬ 
den soll. Das kann eine Datei 
sein. Im Sinne von DOS ist aber 
auch das aktuelle Ausgabe-Ge¬ 
rät eine Datei mit dem speziel¬ 
len Namen »Output«. Mit dem 
Start des Amiga (und solange 
wir nichts ändern) ist Output der 


Bildschirm (genau; das CLI- 
Fenster). Immer noch: Für DOS 
ist das eine Datei, ein File, und 
der Zugriff auf Files geschieht 
über sogenannte Handles. Nor¬ 
malerweise öffnet man einen 
File mit dem Befehl »Open«. 
Nur ist ja unser Output-File 
schon offen, und deshalb gibt 
es eine Funktion mit dem Na- 


* Al_Seka Mein erstes Programm (Seka-Verslon) 

SysBase: 

equ 4 

;Basls von Exec 

LVOOpenLibrary: 

equ -552 

;Library oeffnen 

LVOCloseLlbrary: equ -4l4 

} Library schliessen 

LVOOutput: 

equ -60 

;D0S: Output-Handle holen 

LVOtfrlte: 

equ -48 

;Ausgabe 

•DOS/Lib oeffnen: 


main: move.l 

#dosname,al 

{Name DOS-Lib 

moveq 

#0,d0 

{Version egal 

move.1 

SysBase, a6 

{Basis Exec 

jsr 

LV00penLibrary(a6) 

{DOS-Lib oeffnen 

tst.l 

dO 

{Fehler? 

beq 

finl 

{wenn Fehler, dann Ende 

move.1 

dO,DOSBase 

{merke Zeiger 

» Ausgabe-Handle ermitteln: 


move.1 

DOSBase,a6 

{DOS-Funktlon rufen 

jsr 

LV00utput{a6) 

{Hole Output-Handle und 

move.1 

d0,d4 

{in d4 merken 

* nun Text ausgeben; 


move.1 

d4,dl 

{Ausgabe-Handle 

move.1 

#string,d2 

{Adresse Text 

moveq 

#20,d3 

{Laenge Text 

move.1 

DOSBase,a6 

{Basis DOS 

Jsr 

LVOWrlte(a6) 

{Funktion 'Schreiben' 

* Zum Schluss Immer die Llb schliessenl 

move.1 

DOSBase,al 

{Basis der Library 

move.1 

SysBase,a6 

{Basis Exec 

Jsr 

LVOCloseLlbrary(a6) 

{Funktion 'Schliessen" 

finl: rts 

• Datenbereich: 


{Return zum CLI 

DOSBase; 

dc.l 0 

align 4 


dosname: de 

'dos.library',0 
align 4 


String: de 

'Hallo lieber Leserl' 
align 4 

,10 

Listing 3b. Das nHallo«-Programm in der SEKA-Version 


opt 1- 


{nicht linken! 

* ALJ)ev Mein erstes Programm (DevPac-Version) 

.SysBase equ 

4 

{Basis von Exec 

J,V00penLlbrary equ 

-552 

{Library oeffnen 

J/VOCloseLibrary equ 

-414 

{Library schliessen 

J,V00utput equ 

-60 

{DOS: Output-Handle holen 

J,V0Write equ 

-48 

{Ausgabe 

•DOS/Lib oeffnen: 



jsain move.l #dosname,al 


{Name der DOS-Library 

moveq #0,d0 


{Version egal 

move.l .SysBase,a6 


{Basis Exec 

J sr J,V00penLibrary( a6) 

{DOS-Lib oeffnen 

tst.l dO 


{Fehler? 

beq flni 


{wenn Fehler, Ende 

move.l dO,J30S6ase 


{Zeiger merken 

* Ausgabe-Handle ermitteln: 



move.l JX)SBase,a6 


{DOS-Funktion rufen 

Jsr J,VOOutput(a6) 


{Hole Output-Handle 

move.l d0,d4 


{und in d4 merken 

« nun Text ausgeben: 



move.l d4,dl 


{Ausgabe-Handle 

move.l #string,d2 


{Address Text 

moveq #20,d3 


{Laenge Text 

move.l J)0SBase,a6 


{Basis DOS 

Jsr U,V0Wrlte(a6) 


{Funktion 'Schreiben' 

• Zum Schluss immer die Lib schliessenl 

move.l .DOSBase,al 


{Basis der Lib 

move.1 .SysBase,a6 


{Basis Exec 

Jsr J,V0ClO8eLibrary(a6) 

{Funktion 'Schliessen" 

finl rts 


{Return zum CLI 

» Datenbereich: 



JX)SBase dc.l 0 



dosname dc.b 'dos.library'.O 



enop 0,2 



String dc.b 'Hallo lieber Leser! 

,10 

enop 0,2 



Listing 3c. Die Version des ersten Programms für 

Devpac-Besitzer 
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Kurse 


men »_LVOOutput«, die die 

Handle von Output ermittelt. 
Genau das geschieht mit die¬ 
sen Zeilen: 

move.1 _D0SBase,a6 } 

DOS-Funktion rufen 
jsr _LV00ut 
put(a6) ;Hole Output- 
Handle 

move.1 dO,d4 j 

und in d4 merken 

Wir rufen die DOS-Funktio- 
nen prinzipiell genauso auf, wie 
die Exec-Funktionen. Der Un¬ 
terschied ist nur, daß jetzt das 
Register a6 auf die Basis der 
DOS-Library (_DOSBase) 
zeigt. Auch die tonstante 
>._L.VOOutput« ist an anderer 
Stelle definiert (kommt noch). 
Wie alle Funktionen gibt auch 
»_LVOOutput« ihr Ergebnis in 
dO zurück. 

Da dO ein Register ist, das 
auch andere Funktionen benut¬ 
zen, retten wir es (kopieren es) 
in das Register d4. Jedenfalls 
haben wir nun die Handle im 
Register d4 und können damit 
arbeiten. Um auf einen File 
(oder ein Gerät) zu schreiben, 
braucht DOS diese Parameter: 

- Handle in d1, 

- Adresse, ab der die Daten zu 
finden sind in d2, 

- Anzahl der Daten-Bytes in d3. 
Schauen wir uns nun diese 

Zeilen an, so finden wir alles 
wieder: 

move.1 d4,dl j 

Ausgabe-Handle 

move.l #String,d2 ; 

Addresse Text 

moveq #20, d3 J 

Laenge Text 

So vorbereitet, können wir 
die Funktion »_LVOWrite« auf- 
rufen: 

move.l _DOSBase,a6 ; 

Basis DOS 
jsr _LV0Write 

(a6) ;Funktion 

"Schreiben" 

Wie Sie sehen, ist das Prin¬ 
zip immer gleich: 
move.l Basis_Adresse,a6 

jsr 0ffset(a6) 

Nach dieser Methode wird 
dann auch zum Schluß des Pro¬ 
gramms die DOS-Library wie¬ 
der geschlossen. 

Im Datenbereich finden Sie 
nun einige Assembler-Direkti¬ 
ven. Wichtig ist die Direktive 
»dc.b«. Bitte beachten Sie: das 
ist eine Anweisung an den As¬ 
sembler, kein 68000-Befehl. 

»de« heißt »define constant« 
(definiere Konstante), »dc.b« 
heißt dann Konstante vom Typ 
Byte. »String« ist ein Label, und 
die ganze Anweisung an den 
Assembler lautet nun: Setze ab 


(symbolischer) Adresse String 
die Zeichenfolge »Hallo...« ein. 

»Hallo« wollen wir nun aus- 
drucken. Dazu benötigen wir ei¬ 
nen Zeiger, der auf »Hallo« (ge¬ 
nau: zuerst auf H) zeigt. Dazu 
ernennen wir das Register d2. 
Damit d2 mit der Adresse von 
String geladen wird, schreiben 
wir die Zeile 

move.l #String,d2 ; 
Adresse Text 
Nochmals: »dc.b« heißt defi¬ 
niere Konstante, und zwar hier 
vom Typ Byte. Im Operanden¬ 
feld stehen dann die Bytes. Die¬ 
se können Sie einzeln einge¬ 
ben (dc.b 100,33,20) als Text in 
Hochkommas oder wie hier ge¬ 
mischt. Der Name einer Library 
muß mit einem Null-Byte abge¬ 
schlossen sein, daher auch die 
Null am Ende des ersten »dc.b«. 

Beim zweiten String ist kein 
Null-Byte erforderlich, weil die 
Write-Funktion die Länge als 
Parameter erwartet. Die 10 am 
Ende diese Textes ist der ASCII- 
Code für »neue Zeile«. Damit 
sorge ich dafür, daß nach dem 
Programmlauf der CLI-Prompt 
(1 >) auf einer neuen Zeile star¬ 
tet. 

»enop 0,2« ist eine andere 
Form für »even«, die ich gewählt 
habe, weil sie zumindest der 
HiSoft- und der Metacomco-As- 
sembler gleichermaßen verste¬ 
hen (bei SEKA heißt das 
ALIGN). Sie erinnern sich: Man 
sollte Texte immer auf einer 
Wortgrenze beginnen iassen. 
Noch sicherer (und bei man¬ 
chen Funktionen Pflicht) ist ei¬ 
ne Langwortgrenze (enop 0,4). 

Nun bliebe noch die Frage zu 
klären, wo die Konstanten wie 

zum Beispiel »_LVOOpenü- 

brary« herkommen. Schauen 
wir uns dazu das SEKA-Listing 
(Listing 3b) an. Hier finden Sie 
in den ersten Zeilen sogenann¬ 
te Equates. Auch das sind As¬ 
sembler-Direktiven. 

SysBase: equ 4 

definiert die Konstante SysBa¬ 
se mit dem Wert 4. Demnach 
sind diese Schreibweisen 
gleichwertig. 

move.l SysBase,a6 
move.l 4,a6 
Man sollte generell die erste 
Form wählen. Sowohl beim 
Metacomco- als auch DevPac- 
Assembler gibt es Include-Files 
(Textmodule), in denen diese 
Konstanten definiert sind. 

Inzwischen dürfte Ihnen 
auch aufgefallen sein, daß 

sämtliche Offsets mit »_LVO« 

beginnen. LVO heißt Library 
Vector Offset. Bei SEKA gibt es 
da außer der DOS-Lib (und das 
ist nur 1/16 von allem) nichts. 
Die Unterschiede von SEKA 


zum Standard zeigt man am be¬ 
sten anhand der DevPac-Lö- 
sung (Listing 3c). 

Bei Metacomco und DevPac 
beginnen alle Konstanten mit 
dem Unterstrich. Dieser ist bei 
SEKA als erstes Zeichen nicht 
erlaubt. »dc.b« kennt SEKA 
nicht, man muß das b weglas¬ 
sen. 

Für DOS_Base habe ich mit 
»dc.l 0« diese Adresse mit dem 
Langwort 0 belegt. An sich 
brauche ich aber nur Speicher¬ 
platz für diese Variable, wofür 
man normalerweise »ds.l 1« 
schreibt (definiere Speicher für 
1 Langwort). Da SEKA diese Di¬ 
rektive nicht kennt, bin ich auf 
»dc.l« ausgewichen. 

In der Metacomco-Lösung 
(Listing 3a) fehlt das ganz. Da¬ 
für sehen Sie am Anfang des Li- 
stings sehr oft XDEF. Das heißt 
diese Dinge sind extern defi¬ 
niert, genau: im File »amiga. 
lib«. Bei Metacomco ist nach 
dem Assemblieren noch ein 
Linker-Lauf erforderlich. Dabei 
werden auch die externen Refe¬ 
renzen behandelt. SEKA und 
DevPac kommen ohne Linker¬ 
lauf aus, beziehungsweise kön¬ 
nen mit dem Assembler schon 
lauffähige Programme erzeu¬ 
gen. 

Wenn Sie nun dieses Pro¬ 
gramm mit einem Editor einge¬ 
tippt haben, geht die Arbeit erst 
los. Speichern Sie den Text zum 


Beispiel unter dem Namen 
TESTS und kehren zum CLI 
zurück. Nun folgen mehrere 
Schritte, die von Ihrem Assem¬ 
bler-Paket abhängen. Lesen 
Sie bitte in Ihrem Handbuch 
nach. 

Bei SEKA und HiSoft ist die 
Sache ganz einfach. Geben Sie 
das A-Kommando beziehungs¬ 
weise <AmigaA> bei Hisoft. 
Bei letzterem sollten Sie noch 
darauf achten, daß »nicht link¬ 
barer Code« gewählt wurde, 
womit ein sofort ausführbares 
Programm entsteht. 

Dazu können Sie im Listing 
»opt i-« als erste Zeile eingeben. 
Bitte beachten Sie: es muß 
wirklich die erste Zeile sein, 
auch eine Leerzeile davor ist 
nicht erlaubt. 

Auch bei Metacomco müs¬ 
sen Sie zuerst assemblieren. 
Hier ist dann noch ein Linker- 
Lauf erforderlich. Da beides viel 
Tipperei bedeutet, schreiben 
Sie am besten das Batch-File 
aus Listing 4 und speichern es 
unter dem Namen »make« im s- 
Directory. Tippen Sie nun 

execute make test 
(ohne .sI) 

Nun mögen ja Texte, die wir 
ausgeben, ganz informativ 
sein, aber im allgemeinen er¬ 
warten wir wohl auch Eingaben 
von der Tastatur. Mit Listing 5 
gehen wir deshalb einen klei- 


.key file/a 

c/aasem <file>.s -o <file>.o-c s -i include 
c/alink <fil©>.oto <file> library lib/amiga.lib 

Listing 4. Das Batchfile für die Metacomco-Variante 
von Listing 3 


opt 1- 


{nicht linkenl 

* Stringeingabe 

_SysBase 

equ 4 

{Basis v. Exec 

_LV00penLlbrary 

equ -552 

{Library oeffnen 

_LV0CloseLibrary 

equ -4l4 

{Library schllessen 

_LV00utput 

equ -60 

{DOS: Output-Handle holen 

_LV0Write 

equ -48 

{Ausgabe 

.LVORead 

equ -42 


_LV0Input 

equ -54 


*D0S/Lib oeffnen: 

_main move.l #dosname,al 

{Name der DOS-Library 

raoveq 

#0,d0 

{Version egal 

move.l 

_SysBase,a6 

{Basis Exec 

jsr 

_LV00penLlbrary(a6) jDOS-Lib oeffnen 

tst.l 

dO 

{Fehler? 

beq 

flni 

{Ende wenn Fehler 

move.1 

d0,a6 

{merke Zeiger 

» Ausgabe-Handle ermitteln: 


Jsr 

_LV00utput(a6) 

{Hole Output-Handle 

move.l 

d0,d4 

{und in d4 merken 

move.1 

d4,dl 

{nun Text ausgeben 

Listing 5. Eingabe von Strings In Assembler 
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move.1 

#String,d2 

;wle gehabt 


moveq 

#12,d3 



Jsr 

_LV0Write(a6) 


* Nun lese von 

der Tastatur 



jsr 

_LV0Input(a6) 

jHole Input-Handle 


move.1 

d0,dl 

jund in dl kopieren 


raove.1 

#buffer,d2 

;Adresse des Puffers 


moveq 

#80,d3 

;erlaube 80 Zeichen 


jsr 

_LV0Read(a6) 

;und lese 


move.1 

dO,len 


* nun Inhalt buffer ausgeben: 



move .1 

d4,dl 

;Au8gabe-Handle 


move.1 

#buffer,d2 

jAddress Text 


move.1 

len,d3 

jLaenge Text 


Jsr 

_LV0Write(a6) 

[Funktion "Schreiben* 

* Zum Schluss ijumer die 

Llb schliesseni 



move.1 

a6,al 

;DOS-Lib-Basis 


raove .1 

_SysBase,a6 

[Basis Exec 


Jsr 

_LV0CloseLibrary(a6)j Funktion 'Schliessen" 

fini 

rts 


[Return zum CLI 

* Datenbereloh 




dosname dc.b 

'dos.llbrary ',0 



onop 

0,2 


String dc.b 

'Enter Text: ' 



cnop 

0,2 


buffer ds.b 

80 



len 

ds.l 

1 


Listing 5. (Schluß) 




nen Schritt weiter. Bis hin zur 
Zeile »• nun lese von der Tasta¬ 
tur« hat sich gegenüber dem er¬ 
sten Listing nichts geändert. 
Der ausgegebene Text heißt 
jetzt »Enter Text: «, und an die¬ 
ser Stelle soll der User lostip¬ 
pen. Damit wir wissen, woher 
die Eingaben kommen, müs¬ 
sen wir zuerst die Handle der 
Tastatur kennen. Analog zur 
Output-Handle ermitteln wir 
diese mit der Funktion 

»_LVOInput«. Haben wir die 

Input-Handle, können wir damit 
»_LVORead« aufrufen. 

Diese Funktion verhält sich 
sonst wie »_LVOWrite«, nur 
daß wir hier nicht die Adresse 
eines Textes übergeben, son¬ 
dern die Adresse eines Puffers, 
in dem die Eingabe abgelegt 
werden soll. Mit 

buffer ds.b 80 

weist man den Assembler an, 
nun eine Lücke von 80 Byte zu 
erzeugen. Mit »ds.w 40« oder 
»ds.l 20« hätte ich dasselbe er¬ 
reicht. Auf die gleiche Art wird 
ein Langwort reserviert, in dem 
wir die Länge der Eingabe ab- 
legen können. Die Funktion 

»_LVORead« ist sehr flexibel. 

Die Längenangabe, mit der sie 
aufgerufen wird, ist immer das 
Maximum. Geben Sie weniger 
ein (Ende mit Return-Taste), 
steht nach dem JSR die Ist-Län¬ 
ge im Register dO. Ich kopiere 
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dann dO in die Variable »len«. 
Das muß hier zwar nicht sein, 
sollte aber einmal gezeigt wer¬ 
den. Anschließend wird näm¬ 
lich wieder in das Register d3 
kopiert, um die Ihnen schon be¬ 
kannte Funktion »_LVO 
Write« aufzurufen, die jetzt al¬ 
lerdings den Pufferinhalt aus¬ 
gibt. 

In diesem Abschnitt geht es 
um Schleifen. Vorab möchte ich 
allerdings etwas zur Rationali¬ 
sierung unserer Arbeit tun. Wir 
haben nun schon zweimal die 
Zeilen von Listing 6 eingetippt. 
Speichern Sie den Text aus Ü- 
sting 6 mittels der Block-Funk¬ 
tion Ihres Editors unter dem Na¬ 
men »OpenDos.i«. In den fol¬ 
genden Programmen reicht 
dann eine Include-Anweisung, 
und der Assembler wird diesen 
Text automatisch einziehen. 

Bei Metacomco muß der Da¬ 
tei-Name in Anführungszei¬ 
chen oder Hochkommas ste¬ 
hen. SEKA kennt kein Include, 
dort müssen Sie den Text mit¬ 
tels des R-Kommandos lesen. 

Die folgende Aufgabe lautet: 
Es sollen die Buchstaben von A 
bis Z in einen Puffer geschrie¬ 
ben werden, dann soll der gan¬ 
ze Puffer mittels einer DOS- 
Funktion ausgedruckt werden. 
Eine Lösung wäre diese Me¬ 
thode: 

lea.l buffer,aO 

move.b #'A^(aO)-^ 


move.b #'B’,(aO) + 
raove.b #'C',(aO) + 

Daß das nicht besonders in¬ 
telligent ist, dürfte kiar sein. 
Aber auch dazu müssen die 
Zeichen in einem Puffer ste¬ 
hen, die Frage ist nur, wie wir 
sie da hineinbekommen. Nun, 
man stellt einen Zeiger, hier ein 
Register, auf den Beginn des 
Puffers, und zwar mit 

lea.l buffer,aO 

Das heißt »Lade aO mit der ef¬ 
fektiven Adresse von buffer«. 
Das ».I« ist an sich überflüssig 
(Adressen sind immer lang), 
aber manche Assembler beste¬ 
hen trotzdem darauf. Der Be¬ 
fehl ist von gleicher Wirkung 
wie 

move.l #buffer,a0 

Mit der Anweisung 
raove.b #'A',(aO) + 
wird die l^nstante A auf die 


Adresse geschrieben, auf die 
aO zeigt (hier Beginn buffer) 
und anschließend wird aO um 
eins hochgezählt. Ein beliebter 
Fehler ist übrigens, das ».b« 
wegzulassen. Die Assembler 
setzen dafür nämlich automa¬ 
tisch ».w« ein, womit in diesem 
Fall aO um 2 erhöht wird. aO 
zeigt schon auf die nächste 
Adresse, und wir könnten somit 
das Spielchen fortsetzen. Ge¬ 
nau das wollen wir aber nicht, 
sondern anstatt der vielen Ein¬ 
zelschritte eine Schleife einset- 
zen. Listing 7 bringt die Lösung. 

Im Gegensatz zu einigen 
Konkurrenten hat der 68000 ei¬ 
nen Schleifenbefehl eingebaut, 
nämlich: 

DBcc Dn,Marke 

Das steht für »Decrement and 
Branch on Condition Code«. 
Wow, das ist ein Ding! 

Also der Reihe nach: Mit dem 
DBcc-Befehl wird immer ein 
Datenregister angegeben, das 
kann DO bis D7 sein, nennen wir 


es Dn. Vor dem Eintritt in die 
Schleife wird Dn ein Wert zuge¬ 
wiesen. In der Schleife, genau 
immer dann, wenn der DBcc- 
Befehl durchlaufen wird, wird 
Dn um eins dekrementiert. So¬ 
lange Dn dabei nicht -1 wird, er¬ 
folgt ein Sprung zu »Marke«, 
ansonsten wird der nächstfol¬ 
gende Befehl ausgeführt. Nun 
zum »cc«: Zusätzlich kann man 
nun noch vor dem DBcc-Befehl 
mit zum Beispiel einer 
CMP-Anweisung (compare = 
vergleiche) eine Bedingung te¬ 
sten und dann zum Beispiel sa¬ 
gen: 

CMP (A0)+,D0 

DBeq Dl,Marke 

In diesem Falle erfolgt der 
Sprung zu »Marke« nur dann, 
wenn die Bedingung »A(0) eq 
(equal = gleich) DO« erfüllt ist, 
ansonsten wird die Schleife 
beendet. Man kann es auch so 
sehen; Die Schleife wird durch¬ 


laufen, solange die cc-Bedin- 
gung nicht erfüllt ist, aber nur 
so lange, bis der Zähler auf -1 
ist. Die Kürzel für »cc« sind übri¬ 
gens die gleichen, wie beim 
bcc-Sprung-Befehl. Zum Bei¬ 
spiel gibt es BEQ (Branch if 
Equal) und DBEQ (Decrement 
and Branch if Equal). Die Ein¬ 
zelheiten zu allen »CCs« kom¬ 
men noch, machen wir aber 
erst einmal mit der Praxis wei¬ 
ter. Häufig interessiert nämlich 
die Bedingung überhaupt nicht, 
man will nur zählen. In diesem 
Fall sagt man einfach: 

DBRA 

Das bedeutet »Decrement 
and Branch Allways« (springe 
immer), natürlich nur solange 
der Zähler nicht abgelaufen ist. 
Häufig sieht man auch »DBF«, 
wobei F für »False« (Falsch) 
steht, das ist nur eine andere 
Schreibweise. Gute Assembler 
akzeptieren sowohl »RA« als 
auch »F«. Nun können wir uns 
dem Listing 7 zuwenden. Wir 


.SysBase 

equ 

4 

[Basis von Exec 

_LVO0penLibrary 

equ 

-552 

[Library oeffnen 

-LVOCloseLibrary equ 

-414 

[Library schliessen 

_LV00utput 

equ 

-60 

[DOS: Output-Handle holen 

-LVOWrite 

equ 

-48 

[Ausgabe 

.LVORead 

equ 

-42 


.LVOInput 

equ 

-54 


*D0S/Llb oeffnen: 



jnain move.l 

#dosname,al 


[Name der DOSS-Lib 

moveq 

#0,d0 


[Version egal 

move. 1 

.SysBase,a6 


[Basis Exec 

jsr 

.LVOOpenLibrary(a6) 

[DOS-Llb oeffnen 

tst.l 

dO 


[Fehler? 

beq 

flni 


[Wenn Fehler, Ende 

move.l 

d0,a6 


[Zeiger merken 

Listing 6. Dieses Include-Flle wird noch häufig benötigt 
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opt 

1- 

nicht linken! 

* Drucke A-Z 



include OpenDos.i 


* Ausgabe-Handle ermitteln: 


jsr 

_LV00utput(a6) 

Hole Output-Handle 

move.1 

d0,d4 

und in d4 merken 

* Puffer fuellen 


lea.l 

buffer,aO 


move 

#25,dO 

jSiehe Text 

move.b 

# 'A'.dl 


loop move.b 

dl,(a0)+ 


addq 

#i,dl 


dbra 

d0,loop 


move.b 

#10,(aO) 

;Neue Zeile 

* nun Inhalt buffer ausgeben: 


move.1 

d4,dl 

;Ausgabe-Handle 

move.1 

#buffer,d2 

;Address Text 

move. 1 

#27,d3 

jLaenge Text 

Jsr 

j:,V0Wrlte(a6) 

{Funktion 'Schreiben" 

* Zum Schluss immer die Lib schliesseni 


move.1 

a6,al 

{DOS-Lib-Basis 

move.1 

_SysBase,a6 

{Basis Exec 

jsr 

_LV0CloseLibrary(a6) 

{Funktion 'Schllessen' 

fini rts 


{Return zum CLI 

* Datenbereich 



dosname dc.b 

'dos.library',0 



cnop 0,2 


buffer ds.b 

80 


Listing 7. Drucken von A bis Z - 

mit DBcc 


opt 1- 

{nicht linken! 

«Kommandozeile ausgeben 


* Immer zuerst Adresse und Laenge der 
movem.1 a0/d0,-{sp) 

Kommandozeile retten 

Include OpenDos.i 


Jsr _LV00utput(a6) 

move.l d0,dl 

{Hole Output-Handle 
{da soll sie hin 

movem.1 (8p)+,a0/d0 

{Parameter zurueck 

move.l a0,d2 
move.l d0,d3 
jsr _LV0Write(a6) 

{Adresse Kommandozeile 
{Laenge 

{Funktion 'Schreiben' 

* Zum Schluss immer die Lib schliesseni 

move.l a6,al {DOS-Lib-Basis 

move.l _SysBase,a6 {Basis Exec 

jsr _LV0CloseLibrary(a6) {Funktion "Schliessen' 

fini rts 

{Return zum CLI 

» Datenbereich: 


dosname dc.b ’dos.library'.O 


Listing 8. Dieses Programm liest die Kommandozeile 


wollten ja die 26 Buchstaben 
von A bis Z drucken. 

Weil der Zähler dO aber im¬ 
mer bis -1 läuft, initialisiere ich 
ihn mit 25, siehe erste Zeile. 
Den Code für Buchstaben halte 
ich im Register d1, das wird also 
zuerst mit »A« geladen. 


Bei »Loop« geht es nun los. 
Wie gehabt, packen wir ein Zei¬ 
chen mittels »{a0)+« in den Puf¬ 
fer. Doch nun das Neue: Mit 
»addq #1,d1« wird dl inkre- 
mentiert, aus dem A (ASCII- 
Code 65) wird also ein B (66) 
(dann aus dem B ein C usw.). 


Die Arbeit leistet die nächste 
Zeile. 

dbra dO,loop 

Dekrementiere dO, wenn es 
dann noch nicht -1 ist, springe 
zu »Loop«, ansonsten nächster 
Befehl. Hier ginge es also im 
Falle von -1 bei der Ausgabe 
weiter. 

MOVE.L 4711,AO 
JMP (AO) 

Um wieder auf das DOS zu 
kommen, möchte ich ihnen 
noch ein Programm vorstellen, 
das einen Text ausgibt. Diesmal 
aber einen Text, der im Pro¬ 
gramm nirgends definiert ist. 
Sie rufen bekanntlich ein Pro¬ 
gramm unter CU auf, indem Sie 
nur seinen Namen eintippen. 
Sie können aber dem Namen 
nach einem Leerzeichen noch 
beliebigen Text folgen lassen. 
Diesen Text nennt man die 
Kommando-Zeile. Viele CLI- 
l^mmandos arbeiten damit. 
Tippen Sie zum Beispiel 
cd dfO: 

so rufen Sie damit das Pro¬ 
gramm »cd« auf und übergeben 
die Kommandozeile »dfO:« als 
Parameter. Wie man das Kom¬ 
mando liest, zeigt Listing 8. Das 
DOS speichert die Kommando¬ 
zeile im RAM und stellt das Re¬ 
gister aO auf die Anfangsadres¬ 
se. In dO wird die Länge notiert. 
Da prinzipiell die Register dO, 
d1, aO und a1 »Scratch«, also 
Schmierpapier sind öede Routi¬ 
ne kann sie ändern), muß ein 
Programm, das die l^mman- 
dozeile benötigt, zuerst die Re¬ 
gister aO und dO retten. Norma¬ 
lerweise speichert man beide 
Register in Variablen ab, ich 
möchte Ihnen aber eine andere 
Möglichkeit vorstellen, und das 
wäre der Stack. 

Der 68000 kann mit einem 
einzigen Befehl alle oder einige 
Register auf den Stack bringen 
oder von dort holen. Mit 

movem.1 aO/dO,-(sp) 
werden aO und dO auf dem 
Stack abgelegt. Es sind beliebi¬ 
ge Kombinationen wie »a0/a3/ 
a5/d1/d6« erlaubt, oder Listen 
wie »d0-d7/a0-a4« (dO bis d7, aO 
bis a4). Wichtig ist, daß Sie spä¬ 
ter mit dem analogen Befehl die 
Daten auch wieder vom Stack 
holen. In unserem Fall ge¬ 
schieht das mit 
movem.1 (sp)+,aO/dO ; 
Parameter zurueck 

Danach müssen wir nur noch 
die Register in die Parameter- 
Register der Write-Funktion ko¬ 
pieren und können die Kom¬ 
mandozeile ausgeben. 

Das nächste Programm soll 
fragen »Wie heißt Du?« Der 



User gibt dann einen Text ein 
(ich hoffe, seinen Namen), und 
das Programm antwortet »Gu¬ 
ten Tag, lieber...... Alles, was 

wir dafür brauchen, kennen Sie 
schon (Eingabe und Ausgabe 
von Strings), nur langsam wird 
die Sache lästig. Wir müssen 
nämlich dreimal einen Text aus¬ 
geben. Jedesmal die ganze Se¬ 
quenz dafür zu schreiben, ist 
zwar möglich, aber besser erle¬ 
digt man das mit Unterpro¬ 
grammen. Das Problem bei Un¬ 
terprogrammen ist die Parame¬ 
terübergabe. Wenn ich alle drei 
Parameter der Write-Funktion 
übergebe (drei Befehle) und 
dann mein Unterprogramm 
»print« aufrufe, habe ich nichts 
gewonnen. Ich könnte dann 
auch gleich die drei Parameter 
an Write übergeben und diese 
DOS-Routine rufen. Daher fol¬ 
gende Vereinbarungen: 

1. Die Output-Handle ist be¬ 
kannt (steht in d4) 

2. Es wird nur die Adresse des 
Textes übergeben. Im Text ist 
die Länge »versteckt«. Wie man 
das löst, zeigt Listing 9. 

Hauptsache 

Unterprogramme 

Der Trick steckt in den letzten 
Zeilen. Die ersten Bytes der 
Strings msgl und msg2 halten 
die Länge des folgenden Tex¬ 
tes. Da Strings in Pascal so ab¬ 
gelegt werden, spricht man 
auch von Pascal-Strings. 

Der Aufruf des Unterpro¬ 
gramms erfolgt nach diesem 
Schema: 

lea.l msgl,a0 jfrage 
nach Namen 

bsr print 

Das heißt, nur die Adresse 
des jeweiligen Strings wird 
übergeben. BSR heißt »Branch 
to Sub Routine« (Verzweige 
zum Unterprogramm). Der Un¬ 
terschied zu JSR besteht darin, 
daß BSR auf eine Sprungweite 
von ±32 KByte begrenzt ist, 
während JSR für den vollen 
Adreßbereich des 68000 (16 
MByte) gilt. Sie müssen nicht 
BSR nehmen, das spart nur et¬ 
was Code und Zeit. 

Nun zum Unterprogramm 
selbst (ab Label »print« im Li¬ 
sting). In der zweiten Zeile 

(move.b (a0)+,d3 

steckt des Pudels Kern: das 
Längen-Byte wird in das Regi¬ 
ster d3 kopiert (da erwartet es 
Write). Das kleine »-•■« stellt 
gleichzeitig aO auf den Beginn 
des Textes. Wir können dann 
getrost zwei Zeilen später aO in 
d2 kopieren. Das klappt, nur 
der direkte Zugriff auf den Text¬ 
beginn geht schief (ungerade 
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opt 

1- 

{nicht linken! 

* Unterprogrannn-Demo 


Include OpenDos.i 


Jsr 

_LVCXDutput(a6) 

{Hole Output-Handle 

move.1 

d0,d4 


lea.l 

msgl,a0 

{frage nach Namen 

bsr 

print 


Jsr 

_LV0Input(a6) 

{Hole Input-Handle 

move. 1 

d0,dl 

;und arbeite damit 

lea.l 

buffer,a2 

{Zeiger auf Puffer 

move. 1 

a2,d2 

{an Read uebergeben 

addq.l 

#l,d2 

{Laengen-Byte skippen 

move.1 

#79,43 

{solang darf Name sein 

jsr 

_LV0Read(a6) 

;Ist-Laenge in dO 

addq.l 

#l,d0 

{verlaengern 

move. b 

d0,(a2) 

{und eintragen 

move.b 

#'1',-l(a2,d0.1) 

{I in Puffer 

move.b 

#10,0(a2,d0.1) 

{und noch neue Zeile 

lea.l 

msg2,a0 

{Sage Guten Tag 

bsr 

print 


move.l 

a2,a0 

{drucke Namen 

bsr 

print 


« Zum Schluss immer die Lib schliessenl 


move.1 

a6,al 

{DOS-Lib-ßasis 

move.l 

_SysBase,a6 

{Basis Exec 

jsr 

_LV0Clo3eLlbrary(a6) 

{Funktion 'Schllessen' 

fini 

rts 

{Return zum CLI 


print clr.l 


d3 

niove.b(aO)+,d3 
move.l d4,dl 
raove.l a0,d2 
Jsr _LV0Write(a6) 
rts 


;Laenge 

jOutput-Handle 

;Adresse 

{Funktion 'Schreiben' 


* Datenbereich: 


dosnane dc.b 

msgl 

magZ 

buffer 


'dos.library',0 
cnop 0|2 

dc.b 16,'Wie heisst Du? ' 
cnop 0,2 

dc.b 19,10,'Guten Tag, lieber 

cnop 0,2 

ds.b 80 


Listing 9. Unterprogramme im praktischen Einsatz 


Adresse, Write muß diesen Fall 
abfangen). 

Nun zur ersten Zeile: Die 
Länge muß als Langwort über¬ 
geben werden, wir haben aber 
nur ein Byte. Unser Problem: 
Stehen in einem Register die 4 
Byte »B3 B2 Bl BO«, dann »mo- 
ved« 

raove.b: BO 

move oder move.w: Bl, BO 
move.l: B3, B2, Bl, BO 

Wenn wir nur 1 Byte übertra¬ 
gen, bleibt der Rest von 3 un¬ 
verändert. So können dann im 
Langwort d3 »Hausnummern« 
entstehen. Daher lösche ich 
vorher mit cir (clear = lösche, 
fülle mit Nullen) das Register. 

Hat man sich einmal auf ein 
bestimmtes Verfahren zur Para¬ 


meterübergabe an Unterpro¬ 
gramme eingelassen, dann 
kann das unter Umständen gra¬ 
vierende Folgen haben. Um 
das zu zeigen, habe ich mir die 
Auflage erteilt, daß auch Texte, 
die mit Read gelesen wurden, 
mit der Print-Routine ausgege¬ 
ben werden sollen. 

Read liest bekanntlich in ei¬ 
nen Puffer, und zwar an sich ab 
dessen Beginn. Nun erwartet 
aber Print als erstes Zeichen in 
diesem Puffer die Länge des 
Textes. Das hat zur Folge: 

lea.l buffer,a2 j 

Zeiger auf Puffer 
move.l a2,d2 ; 

an Read uebergeben 

addq.l #l,d2 ; 

Laengen-Byte skippen 


move.l #79,d3 ; 

solang darf Name sein 
jsr _LV0Read 

(a6) ;Ist“Laenge 

in dO 

move.b d0,(a2) ; 

und eintragen 

Die ersten beiden Zeilen sind 
noch die üblichen. Wir stellen 
a2 als Zeiger auf den Puffer-Be¬ 
ginn und kopieren dann a2 
nach d2, wo Read üblicherwei¬ 
se die Pufferadresse erwartet. 
Doch nun wird d2 um 1 erhöht. 
Damit zeigt d2 auf das zweite 
Byte im Puffer, Read wird also 
ab dieser Adresse den Puffer 
füllen, unser Längen-Byte 
bleibt frei. Nach dem JSR wird 
dann einfach die Ist-Länge in 
den Puffer kopiert, was 

move.b d0,(a2) 

erledigt. Doch nun schauen Sie 
auf das Listing, da steht noch 
mehr. Der Grund: Nach dem 
Namen soll noch ein Ausru¬ 
fungszeichen gedruckt wer¬ 
den. Dafür wird 

a) die Ist-Länge erhöht und 

b) das Ausrufungszeichen in 

den Puffer geschrieben. Dahin¬ 
ter soll dann noch wieder die 10 
(neue Zeile) folgen. Daher: 
move.b #'!',-l(a2, 
dO.l) jI in Puffer 

move.b #10,0(a2,d0.1) j 
und noch neue Zeile 

Falls Sie sich bisher noch 
nicht vorstellen konnten, was 
man mit» ARI mit Index und Off¬ 
set« (siehe Adressierungsarten) 
anfangen könnte, hier hätten 
wir eine Anwendung. 

Zuerst stolpern Sie vielleicht 
über das »-1«. Dazu muß man 
wissen, daß die Read-Funktion 
auch die Return-Taste (ASCII- 
Code 10) als letztes Zeichen im 
Puffer ablegt und auch bei der 
Länge mitzählt. 

(a2, dO.l) 

heißt: bilde die Adresse aus 
Summe von a2+d0. Beginnt 
der Puffer zum Beispiel auf 
Adresse 1000 und haben wirdie 
Zeichen ABC eingetippt, so ste¬ 
hen im Puffer 


Adresse = 1000 1001 1002 1003 
Zeichen = A B C Return 


Die Länge ist 4. Folglich ist 
1000+4 (a2 + dO) = 1004 

Wir wollen aber das Aufru¬ 
fungszeichen auf die Adresse 
1003 bringen. Daher addieren 
wir noch das Offset von -1, 
sprich subtrahieren 1. Der 
nächste Befehl 

move.b #10,0(a2,d0.1) 

addiert ein Offset von null. Da¬ 
mit wird dann »#10« auf die 


Adresse 1004 geschrieben. Wir 
können die Null nicht in jedem 
Assembler weglassen. Die 
Syntax des Befehls will dort ei¬ 
ne Konstante sehen. Übrigens 
findet man häufig diese ferm 
mit dem Null-Offset, weil es 
meistens reicht, die Adresse 
nur aus den beiden Registern 
zu bilden. 

Schauen wir uns die Se¬ 
quenz »IF Bedingung THEN 
GOTO« einmal genauer an. 
Prinzipiell funktioniert es wie in 
den Hochsprachen: man fragt 
eine Bedingung ab und ver¬ 
zweigt in Abhängigkeit vom Er¬ 
gebnis. Der kleine Unterschied 
zu den Hochsprachen: Es sind 
zwei Befehle (Abfrage und 
Sprung), und die Bedingung ist 
der Zustand einiger Bits im 
CCR (Condition Code Regi¬ 
ster). Diese Bits - auch Flags 
genannt - haben Namen, und 
zwar heißen sie X, N Z, V und C. 

IF THEN 
und die Flags 

Es gibt viele Befehle, die die¬ 
se Flags beeinflussen, mei¬ 
stens jedoch sind es mathema¬ 
tische Operationen mit zwei 
Operanden, wobei der Quell¬ 
operand vom Zieloperanden 
subtrahiert wird. Wird dabei das 
Ergebnis negativ, setzt der 
68000 das N-Flag (Bit wird 1). 

Entsteht ein Überlauf, wird 
das Overflqw-Bit (V) gesetzt, 
bei einem Übertrag (Addition) 
oder beim »Borgen« während 
der Subtraktion geht das Carry- 
Flag (C) auf Eins. Umgekehrt, 
treten diese Zustände während 
der Operation nicht ein, werden 
die entsprechenden Flags auf 
Null gesetzt. 

Die Flags selbst kann man 
zwar abfragen, aber das ist 
nicht üblich. Statt dessen 
schreibt man einen Befehl, der 
die Flags beeinflußt (prüft) und 
dann sinngemäß »GCTD Adres¬ 
se, wenn dieses Flag diesen 
Zustand hat« . Me rken Sie sich 
bitte, daß GOTO hier Branch 
heißt, wofür man aber nur B 
schreibt. Ganz entscheidend ist 
nun, daß (im Gegensatz zu den 
»8-ßitern«) es auch Branch-Be- 
fehle gibt, die mehrere Flags 
auf einmal berücksichtigen. Es 
gibt zusätzlich verschiedene 
Branch-Befehle für vorzeichen¬ 
lose und vorzeichenbehaftete 
Zahlen (2er-Komplement). Na¬ 
türlich gibt es auch Befehle, die 
nur auf ein Bit reagieren. Tabel¬ 
le 3 bringt eine Übersicht. 

Die In der Tabelle mit »•« ge¬ 
kennzeichneten Operatoren 
gelten nur für Zahlen im soge¬ 
nannten 2er-Komplement-fer- 
mat, das sind diese, bei denen 
das höchstwertige Bit als Vor- 


86 


AMIGA-SONDERHEFT 4 





Kurse 


Zeichen dient. Die Befehle fan¬ 
gen immer mit B (wie Branch) 
an, gefolgt von zwei Buchsta¬ 
ben, die die Kurzform für die 
Bedingung sind. Wenn Sie nun 
beispielsweise BEQ (springe 
wenn gleich) schreiben, dann 
hängt es ausschließlich vom Z- 
Flag ab, ob der Befehl ausge¬ 
führt wird, oder nicht. 

Das Z-Flag kann aber durch 
einen mehr oder weniger weit 
vor dem BEQ liegenden Befehl 
beeinflußt worden sein. Wenn 
Sie nun genau wissen, welcher 
Befehl das Z-Flag wie beein¬ 
flußt, dann könnten Sie das Ri¬ 
siko eingehen. Sicherer ist es 


auf jeden Fall, direkt vor dem 
BEQ einen Befehl zu schrei¬ 
ben, der das prüft. Wenn ich 
zum Beispiel springen will, 
wenn das Register D0=0 ist, 
dann schreibe ich: 

CMP #0,D0 
BEQ Marke 

Der CMP-Befehl subtrahiert 
den Quelloperanden vom Ziel¬ 
operanden, ändert je nach Er¬ 
gebnis die Flags, schreibt aber 
nicht das Ergebnis ins Ziel. Der 
Vergleichsbefehl wirkt also auf 
die Flags wie eine Subtraktion. 
Das müssen sich die armen 
Kollegen mit den »8-Bitern« im¬ 


mer vor Augen führen, wenn 
Sie danach einzelne Flags (mit 
je einem Befehl) testen. Sie ha¬ 
ben es besser. Sie dürfen zum 
Beispiel schreiben BGE (Sprin¬ 
ge, wenn größer oder gleich). 
Sie müssen sich nur dreierlei 
merken: 

- diese Luxus-Befehle sind nur 
direkt nach einem CMP korrekt 
wirksam, 

- der zweite Operand wird ge¬ 
gen den ersten verglichen. 
Wenn ich zum Beispiel sprin¬ 
gen will, wenn DO größer als 9 
ist (DO >9), schreibe ich: 

CMP #9,DO 
BGT Marke 

- Man muß wissen, ob man die 
Operanden als vorzeichenbe¬ 
haftete oder vorzeichenlose 
Zahlen vereinbart hat. Sinnge¬ 
mäß kann man die Kürzel auch 
im Zusammenhang mit DBcc 
anwenden, DBMI oder DBGT 
wären zwei Beispiele. BRA ist 
ein Sonderfall (springe immer); 
dem entspricht auch DBRA 
oder DBF. 

Mit Listing 10 komme ich wie¬ 
der zur Praxis. Die Funktion 
Read legt einen Text Zeichen 
für Zeichen in einem Puffer ab. 
Nun will ich wissen, welche Ta¬ 
ste welchen Code erzeugt. Da¬ 
zu muß ich den Inhalt des Puf¬ 
fers ausdrucken, und zwar in 
hex. Die Hauptaufgabe von Li¬ 


sting 10 ist somit die Ausgabe 
von Bytes in Form von je zwei 
Hex-Zeichen. Für ein A wäre 
zum Beispiel 41 zu drucken. 
Nun muß ich Ihnen allerdings 
gleich verraten, daß wir mit der 
normalen Console, mit der wir 
bisher gearbeitet haben (CON;) 
zwar die Standard-Tasten erfas¬ 
sen, nicht aber die Sonderta¬ 
sten, wozu die Cursor- 
Steuerung und die Funktionsta¬ 
sten zählen. Um also in einem 
Programm auf die Funktionsta¬ 
sten reagieren zu können, müs¬ 
sen wir etwas Besonderes tun. 
Zuerst dürfen wir nicht mehr die 
Standard-Handies Input und 
Output verwenden, sondern 
müssen selbst etwas für das I/O 
tun. Beim Amiga heißt das 
auch: Wenn wir nicht im CLI- 
Fenster arbeiten, müssen wir 
unser eigenes Fenster anlegen. 

Dazu bietet uns der Amiga 
die Auswahl unter einigen Devi¬ 
ces (Geräten) an. Dazu zählen 
unter anderem: 


CON: 

Console 

RAW: 

Console pur 


Der Unterschied zwischen 
»CON:« und »RAW:« ist, daß nur 
letzteres alle Tasten (also auch 
die Sondertasten) behandelt. 
Der Nachteil von RAW: ist, daß 
alle Editierfunktionen ausge- 



Kürzel 

Bedeutung 

Deutsch 

CC 

Carry Clear 

Carry = 0 

CS 

Carry Set 

Carry = 1 

EQ 

Equal 

Z = 1 

GE 

Qreater or Equal 

> = 

... gt 

Greater Than 

> 

Hl 

Higher 

> 

***LE 

Less or Equal 

< = 

LS 

Less or Same 

< ■ 

...LT 

Less Than 

< 

Ml 

Minus 

— 

NE 

Not Equal 

<> 

PL 

Plus 

+ 

...VC 

oVerflow Clear 

V = 0 

...VS 

oVerflow Set 

V = 1 


Tabelle 3. Die Kürzel der Conditlon-Codes 


opt 

1- 


jnioht linken) 

* Zum Schluss 

immer die 

Lib schliessen) 

* Fl Punktionstasten lesen 



move.1 

a6,al jDOS-Lib-Basis 






move.1 

^ysBa8e,a6 jBasis Exec 

Include 

OpenDos.1 



Jsr 

_LV0Clo8eLlbrary(a6) jFunktion "Schliessen" 

_LVOOpen 

equ 

-30 


finl 

rts 

jRetum zum CLI 

.LVOClose 

equ 

-36 






move,1 

# name,dl 

}Naine von RAW: 

» Konvertiere 

d2.1 ln ASCII-String ab (aO) 


move.1 

#1005,d2 

;Statu8 ■ gibt es 





jsr 

_LV00pen(a6) 

jnun oeffnen 

hex 


#2-1,dl jnur fuer 2 Nibble (von 8) 


move.1 

d0,d5 

jHandle merken 


moveq 


tst.l 

dO 

;Fehler? 

next 

rol.l 

#4,d2 jhole 1 Nibble 


beq 

flnl 

jwenn Ja, abbrechen 


move.1 

d2,d3 jnach d3 retten 





and.b 

#$0f>d3 jmaskiere es 

loop 

move.l 

d5,dl 

;von RAW lesen 


add.b 

#48,d3 »in ASCII wandeln 


move. 1 

#buffer,d2 

;ln diesen Puffer 


cmp.b 

#58,d3 jist es >9 ? 


move. 1 

#1,<13 

iLänge, siehe Text 


bcs 

out jwenn nicht 


Jsr 

_LV0Read(a6) 

jLesen aufrufen 


addq.b 

#7,d3 jsonst muss es A-F sein 


cmp.b 

#'x',buffer 

iZelchen = 'x' ? 

out 

move.b 

d3,(a0)+ ;1 Zeichen abspeichem 


beq 

fertig 

jwenn Ja 


dbra 

dl,next jnext nibble 






rts 



move.l 

buffer,d2 

jZeichen nach d2 





lea.l 

hbuf.aO 

jZlel fuer Wandlung 

* Datenbereich: 



move.b 

#’ ',2(a0) 

jBlank nach Rex 





bsr 

hex 

jln Hex-Zahl wandeln 

dosname 

dc.b 

'dos.library',0 






cnop 

0,2 

* nun Hex-Zahl ausgeben 



name 

dc.b 

'RAW:40/100/580/80/Stop mit x’,0 






cnop 

0,2 


move. 1 

d5,dl 

jauch Output im Window 





move. 1 

#hbuf,d2 

jAddress Hex-String 

buffer 

ds.b 

8 


move.l 

#3.d3 

jLaenge 


cnop 

0,4 


Jsr 

_LV0Write(a6) 

jFunktion "Schreiben' 

hbuf 

ds.b 

10 


bra 

loop 

jauf ein Neues 




fertig 


d5,dl 

jRAW wieder schliessen 




jsr 

_LV0Close{a6) 


1 Listing 10. So erfassen Sie die Funktionstasten 
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schlossen, sprich vom Anwen¬ 
derprogramm selbst zu stellen 
sind. RAW: ist das typische De¬ 
vice für Editor-Programme. 

Nun zur Aufgabe: Über dem 
CLI-Window soll ein neues (un¬ 
ser) Window angelegt werden. 
In diesem Fenster erscheinen 
Hexzahlen immer, wenn wir ei¬ 
ne Taste tippen. Die Zahlen be¬ 
schreiben die Codes der Ta¬ 
sten. Tippen Sie also die Buch¬ 
staben von a bis w, werden die 
zugehörigen ASCII-Codes von 
$41 bis $77 ($ heißt hex) ausge¬ 
geben. 

Tippen Sie hingegen die 
Funktionstasten, passiert 
schon mehr. Jede Taste erzeugt 
drei Zeichen, und zwar: 


Fl; 

9B 30 7E 

F2: 

9B 31 7E 

F3: 

9B 32 7E 

Betätigen 

Sie die Cursorta- 

sten, generiert das immer zwei 

Zeichen: 


Auf: 

9B 41 

Ab; 

9B 42 

Links: 

9B 43 

Rechts: 

9B 44 


Allen Sondertasten ist also 
gemeinsam, daß sie eine Se¬ 
quenz erzeugen, die mit $9B 
startet. Damit kann man recht 
einfach diese Tasten von allen 
anderen unterscheiden. Gleich¬ 
zeitig ist das allerdings auch die 
Aufforderung, ein weiteres Zei¬ 
chen auszuwerten, denn erst 
da beginnen die Unterschiede. 
Auf diese Feinheit verzichten 
wir vorerst und sagen einfach: 
Alles anzeigen, was kommt. 
Nun aber zum Listing 10. 

Auch auf ein Gerät greifen wir 
wie auf einen File zu, müssen 
das Device also mit Open öff¬ 
nen und später auch wieder 
schließen. Die zugehörigen 
DOS-LVO’s finden Sie am An¬ 
fang des Listings. Zum Öffnen 
müssen wir den Namen des 
Gerätes (des Files) übergeben 
und den Access Mode. In den 
Inciude-Files findet man die 
Equates 

MODELOLDFILE EQU 1005 
MODE_NEWFILE EQU 1006 

Gemeint ist damit, ob man 
auf eine schon existierende Da¬ 
tei zugreifen oder eine neue an- 
legen will. Da wir wissen (hof¬ 
fen), daß RAW: existiert, wählen 
wir 1005. Unter »name« kommt 
nun die große Überraschung: 
name dc.b 'RAW:40/ 
100/580/80/Stop mit x<,0 

Das reicht, um das Gerät 
RAW: zu öffnen. Gleichzeitig 
schaffen wir damit ein Window 
mit diesen Eigenschaften; 


40/100: 

linke, obere Ecke 

580: 

(x,y in Bildschirm¬ 
punkten) 

Breite des Windows 

80: 

Höhe des Windows 

Stop 
mit x: 

Window-Titei 


Die Funktion gibt wie üblich 
eine Handle zurück, die wir so¬ 
wohl für die Eingabe als auch 
für die Ausgabe benutzen kön¬ 
nen. Das läuft nun wieder über 
die schon bekannten Funktio¬ 
nen Read und Write. Bei Read 
müssen Sie aufpassen. Auch 
wenn Sie als Länge 3 angeben, 
werden für die Funktionstasten 
drei Reads erforderlich (die 
Länge 1 tut’s auch). 

Nach dem Lesen eines Zei¬ 
chens folgt 

cmp.b #'xLbuffer 
jZeichen = ’x' ? 
beq fertig 

jwenn ja 

und damit hätten wir unser er¬ 
stes »!F THEN«. Im Klartext 
heißt das: Vergleiche (cmp = 
compare) die Konstante x mit 
dem ersten Byte im Puffer. Bei 
Übereinstimmung springe zur 
Label »fertig« (branch if equal 
= springe wenn gleich). Unser 
Programm läuft dadurch In ei¬ 
ner Schleife, bis ein x eingege¬ 
ben wird. 

Die folgenden Zeilen berei¬ 
ten die Hex-Wandlung vor. Das 
Unterprogramm »hex« erwartet 
ein Langwort in d2. Es legt das 
Ergebnis im Puffer hbuf ab. 

Das Unterprogramm zeigt 
recht gut, daß man in Assem¬ 
bler oft auf Bit-Ebene arbeiten 
sollte. Damit läßt sich zum Bei¬ 
spiel die Hex-Konvertierung we¬ 
sentlich einfacher lösen, als mit 
der klassischen Methode (fort¬ 
laufende Divisen durch 16). Sie 
werden bei der Gelegenheit 
auch sehen, warum die Hex- 
Darstellung so vorteilhaft ist. 

Ein Beispiel: das Langwort be¬ 
steht aus den 4 Byte des Inhalts 
AA, BB, CC, DD. Ich sehe so¬ 
fort, daß im höherwertigen Wort 
AABB und im niederwertigen 
CCDD steht. In dezimal 
(2864434397) dürfte das 
schwerfallen. Das Problem der 
Routine »hex« ist nun, daß Sie 
tatsächlich ASCII-Zeichen aus¬ 
geben muß. Hat dort ein Digit 
den Wert Null, muß ich den 
ASCII-Code 48 (dezimal) aus¬ 
geben, um die »0« auf dem 
Schirm zu sehen. Das klappt 
ganz gut bis zur Neun (57), 
doch für 10 muß ich hex »A« 
drucken, und das hat den 
ASCII-Code 65, B hat 66 etc. 
Diese Lücke zwischen »9« und 
»A« müssen wir also füllen. 

Zweites Problem: die Hex¬ 


zahl sei $12345678 ($ heißt 
hex). $1 ist ein Nibble (Halb¬ 
byte), das im Register 4 Bit be¬ 
legt (0001 binär). Natürlich muß 
ich $1 zuerst ausgeben, doch 
dafür muß ich $1 auf den Platz 
von $8 bringen, weil im Puffer 
das Zeichen (nach der Um¬ 
wandlung in die ASCII-1) vorn 
stehen muß. Das Byte hat aber 
8 Bit, 4 übertrage ich, die übri¬ 
gen 4 Bit haben Werte, die nur 
stören, folglich muß ich sie aus¬ 
blenden. Damit ergibt sich fol¬ 
gender Ablauf: 

1. Das Nibble $1 auf den Platz 
von $8 bringen. 

2. Dort die übrigen 4 Bit des By¬ 
tes auf Null setzen. 

3. Das Nibble in ASCII wan¬ 
deln. 

4. Das Zeichen im Puffer able- 
gen. 

5. Wiederhole 1.) bis 4.) mit den 
Nibbles $2, $3...$8. 

Dazu eine Anmerkung: das 
Unterprogramm ist universell 
und kann auch Langworte kon¬ 
vertieren. Weil ich hier aber nur 
ein Byte (das höchstwertigste 
Byte!) (zwei Nibbles) ausgeben 
will, lasse ich die Schleife nur 
bis 2-1 laufen. Schritt 1 wird mit 
dem ROL-Befehl erledigt (Rota- 
te Left). Wir benutzen von ROL 
die Syntax 

ROL #4,cl2 

Das heißt rotiere den Inhalt 
von d2 um 4 Bit nach links. Und 
was heißt nun rotieren? Neh¬ 
men wir an, in den d2 stehen 
diese 32 Bit: 


Die Bits werden nach links 
geschoben, und die Bits, die 
dann ganz links »herausfallen«, 
werden rechts wieder einge¬ 
speist. 

Anders sähe es beim ASL- 
Befehi (Shift left, schiebe nach 
links) aus. Da wird auch nach 
links geschoben. Rechts wer¬ 
den Nullen eingespeist und 
links fallen die Bits heraus. Nun, 
wir haben ROL gewählt, und 
damit unser Ziel erreicht. Das 
Nibble (so nennt man ein Halb- 
Byte), das vorher ganz links 
stand, steht nun ganz rechts. 

Unsere Schleife soll zweimal 
durchlaufen werden, folglich 
muß ich vorab (wegen des -1) 
den Schleifenzähler Dl mit 1 
(2-1) laden. Nun erfolgt das be¬ 
rühmte ROL. Danach steht das 
Nibble am richtigen Platz, aber 
ausgeben kann ich leider nicht 
diese 4 Bit alleine, ich brauche 
ein Byte für ein ASCII-Zeichen, 
also 8 Bit. 

Die 4 Bit links von meinem 
Nibble haben aber einen Wert, 
und der muß weg, genau: die 4 


höherwertigen Bit des Bytes 
müssen 0000 werden. Das ge¬ 
schieht über die Maske $F mit 
»andi.b #$0F,d3«. 

Beispiel: 


in d3 steht 

1011 

1010 

AND Maske 

0000 

1111 

ergibt 

0000 

1010 


Das Verfahren lebt davon, 
daß logisch UND nur dann wahr 
(1) ergibt, wenn alle Eingangs¬ 
größen wahr sind. In Assembler 
wirkt UND (and) Bit für Bit. 
Nachdem wir so den reinen 
Zahlenwert (0..15 dezimal) iso¬ 
liert haben, beginnt die Inver¬ 
tierung in ASCII. 0 bis 9 (als 
Zahl) kann direkt in 0 bis 9 (als 
ASCII-Zeichen) umgesetzt wer¬ 
den, das sind die ASCII-Codes 
48 bis 57. Das bedeutet auch, 
48 müssen wir mindestens ad¬ 
dieren. Nun vergleichen wir D3 
mit 58 (eine hex 10, die man als 
A ausgeben muß). Ist die Zahl 
< 10 (also 0 bis 9), kann alles so 
bleiben, es geht zur Ausgabe. 
Andernfalls müssen wir die 
Lücke in der ASCII-Tabelle (65 
für A-58=7) addieren. 

An dieser Stelle ein Hinweis: 
Man sieht manchmal, daß erst 
geprüft wird, ob der Wert zwi¬ 
schen 0 und 9 liegt und dann im 
zweiten Test, ob es ein Wert zwi¬ 
schen 10 und 15 ist. Diese Me¬ 
thode ist in Ordnung, wenn die 
Zeichen aus einer Eingabe 
stammen, wo ja der Anwender 
auch ungültige Zeichen (nicht 


0...9, A...F) eingeben kann. Wir 
holen hier aber Zahlen aus ei¬ 
nem Register, da kann so etwas 
nicht drin stehen! 

Die Befehle CMP und BCS 
kennen wir schon. Warum aber 
BCS? Ja eigentlich nur, um Ih¬ 
nen zu zeigen, was andere Leu¬ 
te so schreiben (und denken 
müssen), die von CPUs kom¬ 
men, die nicht so komfortabel 
wie der 68000 sind. Ein Ver¬ 
gleich wirkt auf die Flags wie ei¬ 
ne Subtraktion. Bei einem »Bor¬ 
gen« wird auch das Carry-Flag 
gesetzt. Das ist aber der Fall, 
wenn D3 > 58 ist. 

Nun ist es ja üblich, daß auf 
den Druck einer Funktions-Ta¬ 
ste hin, ein Programm etwas 
mehr tut, sprich eine Routine 
aufruft. 

Das können sehr kompiizier- 
te Programmteile sein, wir wol¬ 
len aber das Prinzip üben in der 
Art von 

IF Fl THEN GOTO... 

IF F2 THEN GOTO... 


vorher: 1111 0000 0000 0000 0000 0000 0000 0000 

nach ROL #4 0000 0000 0000 0000 0000 0000 0000 1111 
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Die aufgerufene Routine soll 
deshalb auch nur »Hier ist F1, 
F2 usw.« ausgeben, und dann 
auch schon bei F4 enden. Li- 
sting 11 zeigt die Lösung. 

Ich glaube, das Programm 
muß ich nicht mehr groß erklä¬ 
ren; aber jedes Programm hat 
einen Sinn. Notfalls kann es 
nämlich als abschreckendes 
Beispiel dienen, und das soll es 
auch. Stellen Sie sich vor, ein 
Programm mit 100 l^mmandos 
oder mehr würde so arbeiten. 
Das wäre ein Umstand und ein 
Spaghetti-Codel 

Neu ist nur, daß ich jetzt auf 
$9B prüfe und im Falle »keine 
Sondertaste« gleich auf das 
nächste Zeichen warte. Weil ich 
aber im Falle $96 noch eine 


Taste lesen muß, habe ich das 
Lesen in das Unterprogramm 
»GetKey« verlagert. 

Viel eleganter löst man so et¬ 
was mit einem »ON X GOSUB«. 
Dazu müssen wir zwar wieder 
einmal den Schwierigkeitsgrad 
etwas steigern, aber wenn Sie 
das gelernt haben, ist eigent¬ 
lich schon fast alles gelaufen. 
Jedes Programm besteht näm¬ 
lich aus einer Hauptschleife, in 
der es auf Kommandos wartet. 


Die Kommandos werden inter¬ 
pretiert und die passenden Un¬ 
terprogramme aufgerufen. Da¬ 
nach geht es weiter in der 
Hauptschleife. In Basic sähe 
das so aus; 

10 INPUT KOMMANDO 

20 ON KOMMANDO GOSUB 

100,200,300, ... 
30 GOTO 10 

Wie das in Assembler aus¬ 
sieht, zeigt LIsting 12. 

Den Anfang kennen Sie 
schon fast. Nur wird hier der 
Code der Funktionstasten (das 
Byte nach $9B) durch Subtrak¬ 
tion von $30 in die Zahlen 0 bis 
9 gewandeit, so steht er dann 
im Register DO. Der Einfachheit 
halber bearbeiten wir auch hier 


nur die Funktionstasten Fl, F2, 
F3 und F4, also 0,1,2 und 3 in 
DO. 

Bitte beachten Sie, daß alle 
Tests fehlen (es geht um das 
Prinzip!), bei Betätigung aller 
anderen Tasten also das Pro¬ 
gramm abstürzt. Wir wollen ein 
»ON DO GOSUB« realisieren 
und brauchen dazu natürlich 
zuerst vier Unterprogramme, 
die hier wieder Fl, F2, F3 und 
F4 heißen. Diese Unterpro¬ 


gramme sind trivial. Sie geben 
nur die Meldungen »hier ist..« 
aus. Nun betrachten wir das Li- 
stingwiedervon unten. Da steht 
die Marke »table« und das, ge¬ 
nau das, ist das Geheimnis un¬ 
seres »ON X GOSUB«. Diese 
Tabelle ist eine Liste mit den 
Adressen der Unterpro¬ 
gramme. 

Das Erstellen der Tabelle ist 
recht einfach. Schreiben Sie für 
jede Adresse 

dc.l Label 

wobei für Label die Marke (die 
symbolische Adresse) des je¬ 
weiligen Unterprogramms ein¬ 
zutragen ist. Wichtig ist die Rei¬ 
henfolge. Die Folge der Tasten 


muß sich in der Reihenfolge der 
Einträge der Tabelle wiederho¬ 
len. Die Unterprogramme 
selbst können in beliebiger Rei¬ 
henfolge im Listing stehen. Es 
besteht also eine enge Zuord¬ 
nung zwischen den Komman¬ 
dos (hier den Funktionstasten) 
und der Sprungtabelle. Des¬ 
halb kann man aus den Kom¬ 
mandos die zugehörige Adres¬ 
se berechnen. Eine Adresse 
belegt immer 4 Byte. 


Folglich gilt: 

Platz = Beginn + 4 x 
Tastennummer. 

So einfach ist das also. Multi¬ 
plizieren wir nun DO mit 4. Dafür 
hat der 68000 natürlich auch ei¬ 
nen speziellen Befehl (MULU), 
aber genau den nehmen wir 
hier nicht. Ein anständiger 
Assembler-Programmierer wird 
nämlich bei einer Multiplikation 
mit 2 oder 4 oder 8 oder 16 (Sie 
merken es: bei jeder 2er-Po- 
tenz) sofort hellhörig und greift 
auf einen Befehl zu, der das viel 
schneller erledigt. Hier heißt 
dieser Befehl ASL (Arithmetic 
Shift Left). 

»ASL #1,d0« zum Beispiel 
schiebt alle Bits in DO um eine 


Stelle nach links. Die Wirkung 
ist die gleiche, wie die im Dezi¬ 
malsystem, wo Sie durch Links¬ 
schieben der Zahlen (und Fest¬ 
halten des Kommas) mit 10 mul¬ 
tiplizieren. Hier sind wir aber im 
dualen Zahlensystem, womit 
sich nur eine Multiplikation mit 
2 ergibt. Schieben wir aber um 
zwei Stellen, so hätten wir 
schon unser »mal 4«. Das Er¬ 
gebnis müssen wir auf den Be¬ 
ginn der Tabelle addieren. De- 



opt 

1- 

;nicht linken! 

F4 

move.1 

d5,dl 

{RAU wieder schliessen 






jsr 

_LV0Close(a6) 


» F2 Funktionstasten lesen und agieren 










» Zum Schluss 

immer die 

Lib schliesseni 



Include 

OpenDos.i 



move. 1 

a6,al 

{DOS-Llb-Basis 






move.l 

_SysBase,a6 

{Basis Exec 

_LV00pen 

equ 

-30 



jsr 

_LV0CloseLlbrary(a6) 

{Funktion 'Schliessen" 

_LV0Close 

equ 

-36 







move.1 

#name,dl 

;Name von HAU: 

fini 

rts 


{Return zum CLI 


move.1 

#1005,d2 

jStatus s gibt es 






Jsr 

_LVOOpen(a6) 

jnun oeffnen 

GetKey 

move.l 

d5,dl 

{von RAU lesen 


move.1 

d0,d5 

jHandle merken 


move. 1 

a3,d2 

{in diesen Puffer 


tst.l 

dO 

{Fehler? 


move. 1 

#l,d3 

{1 Zeichen 


beq 

fini 

{Wenn ja, abbrechen 


jsr 

_LV0Read(a6) 

{Lesen aufrufen 






rts 




lea.l 

buffer,a3 

{Adresse des Puffers 

print 

elr.l 

d3 


loop 

jsr 

GetKey 

{Lese Taste 


move.b 

(a0)+,d3 

{Laenge 


ömp.b 

«$9B,(a3) 

{Funktionstaste? 


move.1 

dS.dl 



bne 

loop 

{Wenn nicht 


move.1 

a0,d2 



jsr 

GetKey 

{sonst lese Code 


jsr 

_LV0Write(a6) 

{Funktion "Schreiben" 






rts 




cmp.b 

#$30,(a3) 

{Taste Fl ? 






beq 

Fl 

{wenn ja 

* Datenbereich: 




cmp.b 

#$31, (a3) 

{F2 ? 






beq 

F2 

{Wenn Ja 

dosname 

dc.b 

'dos.library' ,0 



cmp.b 

#$32,(a3) 

{F3 ? 


cnop 

0,2 



beq 

F3 

{wenn ja 

name 

dc.b 

'RAW:40/100/580/80/Stop mit F4',0 


cmp.b 

#$33. (a3) 

{Taste F4 


cnop 

0,2 



beq 

F4 

{Wenn Ja, fertig 






bra 

loop 


fa_text 

dc.b 

8,'Hier Fl’,10 







cnop 

0,2 


Fl 

lea.l 

fLtext.aO 

{Adresse Text 

f2_text 

de .b 

8,'Hier F2M0 



bsr 

print 

{drucken 


cnop 

0,2 



bra 

loop 

{auf ein Neues 

f3_text 

dc.b 

8,'Hier F3',10 







cnop 

0,2 


F2 

lea.l 

f2_text,a0 

{Adresse Text 






bsr 

print 

{drucken 

buffer 

ds.b 

8 



bra 

loop 

{auf ein Neues 


cnop 

0,4 






hbuf 

ds.b 

10 


F3 

lea.l 

f3_text,a0 

{Adresse Text 






bsr 

bra 

print 

loop 

{drucken 
{auf ein Neues 

Listing 11. 

Verzweigung mit vielen »IF...THEN«-Strukturen 
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opt 1- ;nlcht linkenl 

» F3 ON Funktionstasten GOSUB 



include OpenDos.l 


_LV00pen 

equ -30 


-LVOClose 

equ -36 



niove. 1 

#nanie,dl 

jName von RAW: 


move.1 

#1005,d2 

;Status = gibt es 


jsr 

_LV00pen(a6) 

jnun oeffnen 


move.l 

d0,d5 

{Handle merken 


tst.l 

dO 

{Fehler? 


beq 

fini 

{wenn ja, abbrechen 


lea.l 

buffer,a3 

{Adresse des Puffers 

loop 

Jsr 

GetKey 

{Lese Taste 


cmp.b 

#$9B,(a3) 

{Funktionsteste? 


bne 

loop 

{wenn nicht 


jsr 

GetKey 

{sonst lese Code 


move.b 

(a3),d0 

{Code -> dO 


ext.w 

dO 

{Buf Wort erweitern 


sub.v 

#$30,dO 

{Code ln 0..3 


asl.v 

#2,d0 

{mal 4 


lea.l 

table,aO 

{Zeiger auf Tabelle 


move.1 

0(a0,d0.w),a0 

{Adresse -> aO 


jsr 

(aO) 

{Routine aufrufen 


bra 

loop 

{bis F4 kommt 

Fl 

lea.l 

fl_text,aO 

{Adresse Text 


bsr 

print 

{drucken 


rts 



F2 

lea.l 

f2_text,a0 

{Adresse Text 


bsr 

print 

{drucken 


rts 



F3 

lea.l 

f3_text,a0 

{Adresse Text 


bsr 

print 

{drucken 


rts 



F4 

move.1 

(8p)+,d0 

{Kill Return Adress 


move.1 

d5,dl 

{RAW wieder schliessen 


jsr 

_LV0Close(a6) 



* Zum Schluss Immer die Llb schliesseni 



move.l 

a6,al {DOS-Lib-Basls 


move.l 

_SysBase,a6 {Basis Exec 


jsr 

_LV0CloseLibrary(a6) {Funktion "Schliessen 

fini 

rts 

{Return zum CLI 

GetKey 

move.l 

d5,dl (Von RAU lesen 


move. 1 

a3,d2 {ln diesen Puffer 


move. 1 

#l,d3 {1 Zeichen 


Jsr 

rts 

_lV0Read(a6) {Lesen aufrufen 

print 

clr.l 

d3 


move.b 

(a0)+,d3 {Laenge 


move. 1 

d5,dl 


move. 1 

a0,d2 


jsr 

rts 

_LV0Write{a6) {Punktion "Schreiben" 

» Datenbereich! 

table 

dc.l 

Fl 


dc.l 

F2 


dc.l 

F3 


dc.l 

F4 

dosname 

dc.b 

'dos.llbrary',0 


cnop 

0,2 

name 

dc.b 

'RAW:40/100/580/80/Stop mit F4',0 


cnop 

0,2 

fl_text 

dc.b 

8,'Hier Fl',10 


cnop 

0,2 

f2_text 

dc.b 

8, 'Hier F2',10 


cnop 

0,2 

f3_text 

dc.b 

8,'Hier F3',10 


cnop 

0,2 

buffer 

ds.b 

8 


cnop 

0,4 

hbuf 

ds.b 

10 


Listing 12. »ON X GOSUB Y« - In Assembler kein Problem 


ren Startadresse beschaffen 
wir uns mit »lea table,aO«<. Nun 
kommt ein ganz wilder Befehl, 
nämlich 

move.l 0(a0,d0.w),a0 

Wir benutzen die Adressie¬ 
rungsart »ARI mit Index und 
Offset«. Nur »Index« gibt es lei¬ 
der nicht, also setzen wir das 
Offset zu null. Demnach er¬ 
rechnet sich die effektive Adres¬ 
se ais die Summe von aO und 
dO. Die müssen wir nun in das 
Zielregister »moven«, und da 
nehmen wir gleich wieder aO. 
So etwas ist beim 68000 er¬ 
laubt, und weil es schön »tricky« 
aussieht, schreibt es auch jeder 
so. AO zeigt nun also auf die 
Adresse des zugehörigen Un¬ 
terprogramms, und das können 
wir nun schlicht mit »jsr (aO)«« 
aufrufen. 

Nach dem »jsr« kehrt das 
Programm sofort zu dem »jsr« 
folgenden Befehl zurück. Der 
heißt »bra loop«, also beginnt es 
wieder von vorn mit dem näch¬ 
sten Kommando. 

Die Ausnahme von dieser 
Regel finden Sie im Unterpro¬ 
gramm »F4«. 


Dieses Unterprogramm ist 
gar keines, es wird zwar mit 
JSR aufgerufen, es endet aber 
nicht mit RTS. Fblglich müssen 
wir die noch auf dem Stack be¬ 
findliche Return-Adresse ent¬ 
fernen. 

Wir eriedigen das an dieser 
Stelle mit dem Befehl »move.l 
(sp)+,d0«. Das ist hier zulässig, 
weil in diesem Fall DO nicht 
mehr benötigt wird. 

Ist doch ganz einfach, oder? 
Es ist Ihnen zu einfach? Nun 
gut, machen wir die Sache et¬ 
was komplizierter. Unser schö¬ 
ner Kommando-Interpreter hat 
einen Nachteil. Die Htomman- 
dos müssen in der Reihenfolge 
von F-Tasten-Codes auftreten. 
Auch andere Folgen, wie 1 bis 9 
oder A bis M sind denkbar, es 
muß aber immer eine Folge 
sein. Sie wissen jetzt, warum 
manche Leute ein Menü anbie¬ 
ten der Art: 


1 = Eingabe 

2 = Rechnen 

3 = Stoppen 


Das merkt sich schlecht, bes¬ 
ser wäre doch 


E s Eingabe 
R * Rechnen 
S = Stoppen 


Das Prinzip ist natürlich wie¬ 
der ganz einfach. Es gibt zwei 
Tabellen. In der ersten Tabelle 
stehen die »Keys« (die erlaub¬ 
ten Tasten oder Kommandos), 
in der zweiten die Adressen der 
zugehörigen Routinen. So muß 
man doch nur den Key in der er¬ 
sten Tabelle suchen und aus 
seiner Platznummer in dieser 
Tabelle einen Zeiger auf den 
richtigen Platz in der Adreßta- 
belle errechnen. Da kann man 
dann die Adresse herausholen 
und ab geht’s. 

Diesmal soll unser Pro¬ 
gramm aber wasserdicht sein. 
Fblglich muß der Fall »nicht ge¬ 
funden« abgefangen werden. 
Wir wolien auch den User nicht 
zwingen, immer die Shift-Taste 
zu betätigen. Deshalb sollen 
Groß- und Kleinbuchstaben 
gleich behandelt werden. 


Schließlich soll das Programm 
universell sein, sprich: es muß 
mit minimalem Aufwand mög¬ 
lich sein, Funktionen hinzuzu¬ 
nehmen oder zu ändern. 

Nun denn, hier ist Listing 13. 
Wir lesen wieder eine Taste, 
jetzt aber nur eine, weil wir kei¬ 
ne Funktionstasten erwarten, 
beziehungsweise diese igno¬ 
rieren werden. 

Nachdem das Zeichen in das 
Register dO geladen wurde, soll 
es in einen Großbuchstaben 
gewandelt werden, falls es 
nicht schon ein Großbuchstabe 
ist. Force Uppercase nennen 
das die Fachleute in Neu¬ 
deutsch. 

Wenn Sie einmal auf eine 
ASCII-Tabelle schauen, wird Ih¬ 
nen sicherlich auffallen, daß 
sich die Klein- und die Groß¬ 
buchstaben immer um 32 un¬ 
terscheiden. 2 hoch 5 ist aber 
auch 32, sprich, im Falle von 
Kleinbuchstaben ist Bit 5 ge¬ 
setzt. Folglich wird ein guter 
(sind Sie doch) Assembler-Pro¬ 
grammierer nicht sagen »wenn 
der Code > Z ist, dann subtra¬ 
hiere 32«, sondern er sagt ein- 
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Kurse 


fach »lösche Bit 5«. Auch dafür 
kennt der 68000 einen Befehl, 
nämlich »BCLR« (Bit Clear). 

bclr #5,d0 

löscht Bit 5 (setzt es auf 0) im 
Operanden (hier dO). 

An dieser Stelle sind wir also 
soweit, daß wir prüfen können, 
ob der User E, R oder S einge¬ 
geben hat. Wenn Sie nun bitte 
einmal auf das Ende des Li- 
stings schauen: Da gibt es eine 
kleine Tabelle für diese drei Zei¬ 
chen. Darunter aber steht: 
count equ *-keys 

Wow, schon wieder so ein 
Ding! Fangen wir mit »equ« an. 
»equ« ist ein sogenanntes 
Equate (englisch), Sie lesen es 
aber am besten als »equal = 
gleich). Die Assembler-Direkti¬ 
ve von zum Beispiel 

Anton equ 4711 
bedeutet, ab jetzt kann man an¬ 


statt 1 auch Anton sagen. »JSR 
Anton« wäre dann ein gültiger 
Befehl. Prinzipiell ist das nichts 
weiter als reine Textverarbei¬ 
tung. Der Assembler setzt ein¬ 
fach nachher für Anton immer 
eine 4711 ein. Wir müssen An¬ 
ton aber jetzt auch als Konstan¬ 
te ansehen. Falls Sie Pascal 
können, betrachten Sie das 
»equ« wie »const«, als C-Pro- 
grammierer wie ein »#define«. 
Daher dürfen wir in diesem Pro¬ 
gramm auch beim Bezug auf 
»count« nicht »count« schrei¬ 
ben, »# count« ist Pflicht! 

Das nächste »Wow« ist der 
»*«. Als erstes Zeichen in einer 
Programmzeile ist er ganz 
harmlos und bedeutet nur 
»Kommentar folgt«. Als Ope¬ 
rand heißt er Location Counter 
(LC). Sie wissen, daß Befehle, 
je nach Anzahl und Art der Ope¬ 
randen verschieden viel Spei¬ 
cher belegen. Deshalb führt der 


Assembler einen Zähler, der so¬ 
zusagen die bis zu jedem Be¬ 
fehl verbrauchten Byte mitzählt. 
In diesem Sinne entspricht der 
LC dem PC (Program Counter), 
mit dem nachher die CPU ein 
Programm verfolgt. Der Unter¬ 
schied: Der LC wird auch durch 
Assembler-Direktiven inkremen- 
tiert, wie zum Beispiel »dc.b«, 
das ja auch Bytes (mit Daten) 
belegt. 

In der Assembler-Syntax 
heißt nun aber der LC nicht LC 
sondern »•«. Betrachten wir ein 
Beispiel. ImListing hätte der LC 
zu Beginn der Zeile mit der Mar¬ 
ke »keys« den Wert 100. Die An¬ 
weisung »dc.b E, R, S » läßt ihn 
auf 100 (für E), stellt ihn dann 
auf 101 (für R) und schließlich 
auf 102 (für S). 

Die nächste Zeile mit der 
Marke »count« sieht den LC als 
103. An dieser Stelle erfolgt 
aber ein Equate. Da in Equates 


auch Ausdrücke erlaubt sind, 
hat 

count equ *-keys 
die Wirkung von 
count = LC - keys 
Das in Zahlen ergibt 
count = 103-100 
Damit hätten wir unsere sym¬ 
bolische Konstante 3. Warum 
habe ich da nicht einfach 
»count equ 3« geschrieben? 
Antwort: Das machen nur An- 
fänger! Wenn wir nämlich spä¬ 
ter die Tabelle erweitern, kön¬ 
nen wir das tun, ohne die Zeile 
mit dem »equ« anfassen zu 
müssen. In jedem Assembler¬ 
lauf (der muß dann eh sein) wird 
automatisch die richtige Anzahl 
eingesetzt. Außerdem: Tabellen 
können ganz schön lang sein, 
da kann man sich leicht verzäh¬ 
len. Nun müssen wir den Key 
(steht immer noch in DO) in der 



opt 

1- 

jnicht linken! 

* Zum Schluss 

immer die 

Lib schliessen! 


* CASE X OF 













move. 1 

aS.al 

iDOS-Lib-ßasls 


include 

OpenDos.i 



move.1 

_SysBase,a6 

jBasia Exec 






Jsr 

_LV0CloseLibrary(a6) 

;Funktion "Schliessen 

_LV00pen 

equ 

-30 






.LVOClose 

equ 

-36 


fini 

rts 


jRetum zum CLI 


move.l 

#naine,dl 

jName von RAW: 

GetKey 

move.1 

d5,dl 

jvon RAW lesen 


move.l 

#1005,d2 

iStatus ° gibt es 


move.1 

a3,d2 

)ln diesen Puffer 


Jsr 

_LV00pen(a6) 

jnun oeffnen 


move.1 

#l,d3 

;1 Zeichen 


niove. 1 

d0,d5 

;Handle merken 


Jsr 

_LV0Read(a6) 

;Lesen aufrufen 


tst.l 

dO 

iFehler? 


rts 




beq 

flni 

iwenn Ja, abbrechen 









print 

move.1 

aO,al 

{kopiere Textzeiger 


lea 

buffer,a3 

jAdresse des Puffers 

Pl 

addq.l 

#l,al 

;+l 






cmp.b 

#0,(al)+ 

)Null-Byte? 

loop 

jsr 

GetKey 

;Lese Taste 


bne 

pl 

jwenn nicht 






sub.l 

B0,al 

;= Textlaenge 

* Key in Tabelle gueltlger Keys suchen 






» _ 





move.l 

al,d3 

;Laenge 


move.b 

(a3).d0 

;Code -> dO 


move.1 

d5.dl 

{Handle 


bclr 

#5,d0 

;force uppercase 


move.1 

a0,d2 

{Adresse Text 


lea 

keys,a0 

;Tab. gueltige Keys 


Jsr 

_LV0Write{a6) 

{Funktion "Schreiben" 


move 

#count,dl 

jderen Anzahl 


rts 



search 

cmp.b 

(a0)+,d0 

;Key hier? 






dbeq 

dl,search 

;wenn nicht 

* Datenbereich: 




tst 

dl 

;Key gefunden? 






bmi 

loop 

;wenn nicht 

table 

dc.l 

Eingabe 







dc.l 

Rechnen 


* Rechne Adresse zu Key 




dc.l 

Stoppen 



neg 

dl 

;sub dl,#count 

keys 

dc.b 

’E','R','S' 



add 

#count,dl 

jergibt Platz-Nr. 

count 

equ 

»-keys 





von Key 


cnop 

0,4 



Isl 

#2,dl 

;die mal 4 






lea 

table,aO 

iZeiger auf Tabelle 

dosname 

dc.b 

'dos.llbrary', 

,0 


move. 1 

0(a0,dl),a0 

; Adresse -> aO 


cnop 

0,2 






name 

dc.b 

'RAU;40/100/580/80/Stop mit S',0 


Jsr 

(aO) 

;Routlne aufrufen 


cnop 

0,2 



bra 

loop 

;bis F4 kommt 

E_text 

dc.b 

'Hier Eingabe 

M0,0 

Eingabe 

lea 

E_text,aO 

jAdresse Text 


cnop 

0,2 



bsr 

print 

jdrucken 

FLtext 

dc.b 

'Hier Rechnen 

',10,0 


rts 




cnop 

0,2 


Rechnen 

lea 

R_text,aO 

jAdresse Text 

buffer 

ds .b 

8 



bsr 

print 

j drucken 


cnop 

0,4 



rts 











hbuf 

ds.b 

10 


Stoppen 

move. 1 

(sp)+,dO 

}Kill Return Adress 






move. 1 

d5,dl 

;RAW wieder schliessen 






jsr 

_LV0Close(a6) 


Listing 13. 

Universelle Menütechnik 
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Tabelle »Keys« suchen. Diesen 
Teil finden Sie unter »Suche Ta- 
sten-Code in Tabelle«. Das Pro¬ 
blem: auch »nicht gefunden« 
muß gemeldet und erkannt wer¬ 
den. Die Lösung ist eine DBcc- 
Schleife. Führen Sie sich bitte 
immer vor Augen 

DBcc dn,loop 

heißt: verlasse die Schleife, 
wenn die Bedingung cc erfüllt 
ist, oder dn auf -1 gelaufen ist, 
sonst springe zu »loop«. 

Vorab wird mit »lea keys,aO« 
ein Zeiger auf den Beginn der 
Tabelle gestellt. Der Trick: Der 
Schleifenzähler D1 wird mit 
Count geladen (hier 3), eine 
DBcc-Schleife läuft aber im 
Grenzfall bis -1, hier also über 
vier Schritte. Wenn die Schleife 
wegen des »eq« (»equal« be¬ 
deutet gefunden) im »dbeq« 
verlassen wird, kann D1 nicht 
negativ sein. Ist es negativ, 
kommt das »bmi Start« zur Wir¬ 
kung (springe, wenn negativ). 

Unter »Suche Adresse zu 
Key« taucht nun das nächste 
Problem auf. ln der DBcc- 
Schleife lief D1 ja rückwärts. Es 
hat also diese Werte im Falle 
von »gefunden von«: 


Key 

D1 

1 

3 

2 

2 

3 

1 


Ich brauche aber die Folge 0, 
1,2, um wieder auf die Adreßta- 
belle wie im vorigen Beispiel 
zugreifen zu können. Dieses er¬ 
gäbe sich ganz einfach, wenn 
ich von Count D1 subtrahieren 
würde. (3-3=0, 3-2=1, 3-1=2). 
Leider erlaubt der 66000 den 
Befehl »sub d1,#count« nicht; 
wie soll er auch von einer Kon¬ 
stanten etwas subtrahieren? Da 
hilft die Anweisung 

neg dl 

Ich negiere dl. War es 3, 
dann wird es -3. Darauf addiere 
ich Count, ergibt 0. Alte Regel: 
Wenn man nicht subtrahieren 
kann, muß man eben den nega¬ 
tiven Wert addieren. Den Rest 
hatten wir schon. Ais kleinen 
Unterschied habe ich hier nun 
anstatt »asi« »Isl« genommen 
(logical shift left«. Der Unter¬ 
schied: ASL schiebt arithme¬ 
tisch korrekt, würde also auch 
das Vorzeichen berücksichti¬ 
gen, wenn wir eines hätten. Da¬ 
mit wären wir wieder an der 
Steile angekommen, die das 
vorige Programm ausmachte. 
Mit »lea table,a0« zeigen wir auf 
die Adreßtabelle, und den Rest 
kennen Sie schon, fast... 

Ein Blick auf die Texte zeigt 
Ihnen, daß ich die Längenbytes 


weggelassen habe. Statt des¬ 
sen sind alle Texte mit einem 
Null-Byte abgeschlossen. Die¬ 
se Technik ist sehr praktisch, 
weil ich mich jetzt um die Text¬ 
länge (das Abzählen der Zei¬ 
chen) überhaupt nicht mehr 
kümmern muß. Nun muß aller¬ 
dings das Unterprogramm et¬ 
was mehr tun, sprich in einer 
kleinen Schleife das Null-Byte 
suchen. Die Routine fängt nur 
einen Fall nicht ab, nämlich daß 
der String leer ist (nur aus ei¬ 
nem Null-Byte besteht). 

Makro ist die Kurzform von 
Makro-Befehl. Makro selbst 
heißt so viel wie »groß«. Prinzi¬ 
piell ist ein Makro nur eine Zu¬ 
sammenfassung einer Gruppe 
von Einzelbefehlen, wie wir sie 


bisher kannten, unter einem 
neuen Namen. Leider hat jeder 
Assembler da seine eigene 
Syntax. Ich bringe deshalb alle 
folgenden Beispiele in der Ma¬ 
krosprache der HiSoft/Meta- 
comco-Assembler (stimmen 
überein). Hier ein Beispiel: 

CALLEXEC macro 

move.l _SysBase,a6 
Jsr _LV0\l(a6) 

endm 

Dieser Makro realisiert die 
Funktion CALLEXEC (Funktion 
der Exec-Library aufrufen), wie 
wir sie schon kennen. Jeder 
Makro hat einen Namen, der im 
Label-Feld stehen muß, gefolgt 
von dem Schlüsselwort »ma¬ 
cro«. Ein Makro endet mit dem 
Schlüsselwort »endm«. Zwi¬ 
schen »macro« und »endm« 
kann eine beliebige Anzahl von 
Befehlen stehen. Ist der Makro 
einmal definiert, kann er belie¬ 
big oft mit seinem Namen auf¬ 
gerufen werden. Innerhalb ei¬ 
nes Makros dürfen auch die 


Namen anderer, dann schon 
vorher definierter Makros, ste¬ 
hen. Ob und wie tief Makros so 
geschachtelt werden dürfen, le¬ 
sen Sie aber besser im Hand¬ 
buch des verwendeten Assem¬ 
blers nach. 

Denken Sie jedoch immer an 
eines: Makros sind reine Text¬ 
bausteine. Immer, wenn Sie 
den Makro aufrufen, wird ledig¬ 
lich dessen Text in den Pro¬ 
grammtext eingefügt. Es han¬ 
delt sich also nicht um Unter¬ 
programme. Hier zwei Makros, 
die Sie zu Beginn eines Pro¬ 
gramms tippen können. 

CALLLIB MACRO 

JSR \1(A6) 
ENDM 


LINKLIB MACRO 

MOVE.L \2,A6 
CALLLIB \1 
ENDM 

Der Makro »CALLLIB« wie 
»Call Library« beinhaltet das Ih¬ 
nen schon bekannte »jsr off- 
set(a6)«. Wichtig ist hier, daß wir 
dem Makro einen Parameter 
übergeben müssen, nämlich 
den einzusetzenden String. Für 
solche Parameter haben Ma¬ 
kros Variable. Meistens üblich 
sind aber Ziffern mit einem 
Schrägstrich oder (bei SEKA) 
einem Fragezeichen davor. Bei 
Metacomco und DevPac 2.0 
sind auch noch die Buchstaben 
A bis Z erlaubt. Beachten Sie 
bitte, daß der Schrägstrich bei 
Metacomco und HiSoft ein 
»Backslash« (nach links gekipp¬ 
ter Strich) sein muß. Das Pro¬ 
gramm in Listing 14 soll ledig¬ 
lich das schon bekannte »Hal¬ 
lo« ausgeben. 

Das sieht doch richtig gut 
aus. Was ist nun der Haken an 


der Sache? Es fehlen die Ma¬ 
kros, die ich Ihnen mit Listing 15 
vorstellen möchte. 

Den Makro LINKLIB finden 
Sie in ähnlicher Form in den 
Include-Files von Metacomco 
und Hisoft. 

Die Zeilen 2 bis 4 können Sie 
prinzipiell auch weglassen. Da 
Sie aber in den Include-Files 
häufig anzutreffen sind (schau¬ 
en Sie mal rein, lohnt sich), soll¬ 
te das aber doch erklärt wer¬ 
den. NARG ist eine Assembler- 
Variable und heißt »Number Ar¬ 
guments«. Diese Variable ist 
nur innerhalb eines Makros gül¬ 
tig (sonst Null) und hält die An¬ 
zahl der Parameter, mit denen 
der Makro aufgerufen wurde. 
Ob die Anzahl stimmt, ist eine 
andere Frage, aber das kann 
man prüfen. Dazu benutzt man 
eine zweite Eigenschaft guter 
Assembler, nämlich bedingtes 
Assemblieren. Hierfür gilt die 
generelle Form 

IFcc 

(tue das, wenn cc true) 
ENDC 

(hier weiter, wenn cc 
false) 

Die Bedingungen »cc« sind 
prinzipiell die gleichen, wie wir 
sie schon von den Branch-Be- 
fehlen her kennen. Die Ein¬ 
schränkung ist allerdings, daß 
immer nur ein Argument gegen 
Null verglichen werden kann. 
Will ich also prüfen, ob die An¬ 
zahl der Makro-Argumente 
(NARG) stimmt, und im Fehler¬ 
fall eine Warnung ausgeben, so 
muß ich sagen: Wenn NARG 
minus 2 nicht gleich Null oder 
IFNE NARG-2 

Sie brauchen diese Tests in 
aller Regel nicht durchzufüh¬ 
ren, der Assembler meckert 
dann nur etwas später. Nun hät¬ 
ten wir noch ein kleines Pro¬ 
blem. Nehmen wir an, Sie hät¬ 
ten einen Makro geschrieben 
der Art von 

nonsens macro 
loop move dl,d2 

bra loop 

endm 

Schreiben Sie nun in Ihrem 
Programm 
nonsens 
nonsens 

so wird der Makroprozessor 
daraus folgende Zeilen ent¬ 
wickeln: 

loop move dl,d2 

bra loop 

loop move dl,d2 

bra loop 

Spätestens beim zweiten 
»bra loop« wird der Assembler 
ins Schleudern geraten. Zu wel¬ 
chem »loop« soll er denn nun 



opt 1- 

jnlcht llnkenl 

_SysBase 

equ 4 

jBasls von Exec 

_LV00penLlbrary 

equ -552 

jLibrary oeffnen 

_LV0CloseLibrary equ -4l4 

iLlbrary schllessen 

_LV00utput 

equ -60 

iDOS: Output-Handle holen 

.LVOWrite 

equ -48 

;Ausgabe 

jnaln 

move.l #dosname,al 

;Name der DOS-Lib 


moveq »®,d0 

jVerslon egal 

LINKLIB 

OpenLlbrary,_SysBase 

;D0S-Lib oeffnen 


tst.l dO 

jFehler? 


beq flni 

{Wenn Fehler, Ende 


move.l d0,_D0SBase 

{Zeiger merken 

LINKLIB 

Output,_D0SBase 

{Hole Output-Handle 


prlnt dO, #string,20 

{Text ausgeben 


move.l _D0SBase,al 

{Basis der Lib 

LINKLIB 

CloseLibrary,_SysBa8e 

{Funktion 'Schllessen'’ 

flni 

rts 

{Return zum CLI 

_D0SBa8e 

dc.l 0 


dosname 

de.b 'dos.library',0 
enop 0,2 


String 

dc.b 'Hallo lieber Leserl',10 
enop 0,2 


Listing 14. Der Einsatz von Makros bringt Arbeits¬ 
erleichterung und reduziert den Schreibaufwand 
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springen? Er wird mit einer Feh¬ 
lermeldung aussteigen. 

Um so etwas zu vermeiden, 
gibt es nun in guten Assem¬ 
blern immer eine Lösung. Set¬ 
zen Sie anstatt eines Namens 
für die Marke $n ein. Für n ist ei¬ 
ne Zahl zwischen 1-999 einzu¬ 
setzen. Diese Zahl wird bei je¬ 
dem Aufruf des Makros um eins 
hochgezählt. Wenn Sie mehre¬ 
re Makros mit internen Labels 
venvenden, müssen Sie aller¬ 
dings darauf achten, daß Sie 
mit unterschiedlichen und weit 
auseinanderliegenden Zahlen 
starten. 

Auch die Include-Anweisung 
kann man zuerst zusammen 
mit Makros sinnvoll einsetzen. 
Nehmen wir an. Sie haben die 
Makrodefinition von Listing 15 
in einem Textfile mit dem Na¬ 
men »Mac66« abgelegt. Dann 


können Sie das Programm in 
Listing 14 jetzt so schreiben: 
include "Mac66" 


PRINT 

#msgl, 

#lenl 

PRINT 

#msg2, 

#len2 

msgl 

dc.b 

'Hallo 

lenl 

equ 

*-msgl 

ds.w 

0 


msg2 

dc.b 

'Amiga 

len2 

equ 

*-msg2 


end 

Diese Methode ist sehr sinn¬ 
voll, denn Sie werden sicherlich 
in jedem Programm zahlreiche 
DOS-Funktionen einsetzen. 
Wenn Sie sich diese Funktio¬ 
nen einmal als Makros definiert 
und in Ihrem »Mac-File« abge¬ 
legt haben, ersparen Sie sich 
nicht nur eine Menge an Tippe¬ 
rei, sondern auch auch einiges 
an Zeit für die Fehlersuche we¬ 
gen nicht gemachter Tippfehler. 
Es schadet durchaus nicht, 
wenn im jeweiligen Programm 
viele der Makros nicht genutzt 


werden. Sie erzeugen ja dann 
auch keinen Code. Wird die 
»Mac-Lib« (Kürzel für Library = 
Bibliothek) zu groß, kostet es 
natürlich Zeit, wenn sie der As¬ 
sembler bei jedem Lauf einie¬ 
sen muß. Auf einer RAM-Disk 
kann dies unter Umständen zu 
Platzproblemen führen. Des¬ 
halb sollten Sie Ihre »Lib« mög¬ 
lichst in mehrere kleine Files 
nach Sachgebieten aufteilen. 

Daß Ihr Amiga ein Multitask¬ 
ing-Betriebssystem hat, wissen 
Sie natürlich, nur hat das auch 
in Assembler einige Konse¬ 
quenzen. Prinzipiell kann Ihr 
Task (Programm) so tun. als sei 
er der einzige Task im System. 
Praktisch kommen Sie damit 
nicht weit, denn Sie müssen mit 
anderen Tasks kommunizieren, 
um zum Beispiel zu erfahren, 
ob die Maus bewegt wurde. Die 


l^mmunikation erfolgt beim 
Amiga über Message-Ports. 
Gesteuert wird das Ganze vom 
Message-Dispatcher, den Sie 
sich wie das Mädchen in der Te¬ 
lefonzentrale vorstellen kön¬ 
nen, das die Verbindungen zwi¬ 
schen den einzelnen Teilneh¬ 
mern herstellt. Nur haben wir 
eine Super-Telefonistin. Sind 
Sie nämlich gerade besetzt, 
schreibt das Mädchen alles auf 
und gibt Ihnen die Nachricht 
durch, sobald Sie wieder frei 
sind. Etwas fachlicher: Die 
Nachrichten werden in einem 
Message-Queue gepuffert. Sie 
müssen natürlich mindestens 
ein »Telefon« haben, sprich min¬ 
destens einen Message-Port 
für Ihren Task einrichten. 

Typisch für einen Task ist, daß 
er auf eine Nachricht wartet, al¬ 
so darauf, daß der User endlich 
mal eine Taste drückt oder die 
Maus bewegt. Dahinter steckt: 
Alle Eingaben laufen über ei¬ 
nen Task mit dem Namen »in- 
put.device«. Der Amiga sorgt 


dafür, daß Nachrichten zu Ih¬ 
rem Task (Ihrem Fenster) ge¬ 
langt, nur Sie müssen darauf 
warten. 

Die unfeinste Methode ist 
nun das sogenannte Polling. 
Dazu geht der Task einfach in 
eine Schleife, in der er den 
Message-Port so lange abfragt, 
bis dort eine Nachricht anliegt. 
Damit verbraucht er nur Rech¬ 
nerzeit, die anderen Tasks dann 
fehlt. 

Besser ist es eine Funktion 
mit dem Namen Wait zu benut¬ 
zen. In diesem Falle wird der 
Task aus der Liste der aktiven 
Tasks gestrichen und geht auf 
die Liste der wartenden Task, 
wo er den Betrieb nicht mehr 
auf hält. Man sagt auch, der 
Task schläft. Wach bleibt aber 
das Betriebssystem, das stän¬ 
dig prüft, ob eine Nachricht für 
den Task kommt. Ist das der 
Fall, wird der Task wieder ge¬ 
weckt (er setzt nach dem Wait- 
Aufruf fort) und kann nun seine 
Nachricht behandeln, zum Bei¬ 
spiel auf einen Tastendruck so 
reagieren, wie es das Pro¬ 
gramm vorsieht. 

Screens, 
Windows und 
Gadgets 

Die einfachste Form von Wait 
ist die Funktion WaitPortO- Da¬ 
mit wartet man auf einen Port. 
Nun kann der Task aber mehre¬ 
re davon haben, nicht aber auf 
alle Ports warten wollen. Für 
diesen Zweck gibt es die Si¬ 
gnal-Bits. Jeder Port wird einem 
von 32 Bits zugeordnet, jeder 
Task hat seine eigenen Signal- 
Bits. Ein Task kann allerdings 
nur maximal 16 Bit belegen, die 
anderen 16 braucht das Sy¬ 
stem. Um nun auf eine beliebi¬ 
ge Port-Kombination zu warten, 
muß man nur die entsprechen¬ 
den Bits »verodern« (ihre Werte 
addieren) und damit WaitQ auf- 
rufen (im Gegensatz zu Wait- 
Port). Ein Task sendet eine 
Message mit PutMsgQ. Erreicht 
diese Nachricht einen schlafen¬ 
den Task (einen der WaitQ auf- 
geruten hatte), wird er damit ge¬ 
weckt. Der Empfänger-Task 
wird nun mit GetMsgQ die 
Nachricht lesen. Er sollte dann 
mit ReplyMsgQ den Empfang 
quittieren. Letzteres ist bei eini¬ 
gen Tasks, zum Beispiel Intui¬ 
tion, absolute Pflicht. 

Das Thema Multitasking ist 
hiermit noch bei weitem nicht 
vollständig behandelt, doch wir 
müssen uns jetzt erst einmal 
um einige andere Amiga-Spe- 
zialitäten kümmern, um danach 
wieder automatisch beim Multi- 
t^king zu landen. 


Neben den Libraries gibt es 
noch drei grundlegende Dinge, 
die man kennen sollte, nämlich 
Screens, Windows und Gad¬ 
gets. Der Amiga erlaubt, meh¬ 
rere virtuelle Bildschirme einzu¬ 
setzen. Auf jedem Screen kön¬ 
nen sich wiederum mehrere 
Windows befinden. Der äußer¬ 
liche Unterschied: Ein Screen 
kann immer nur vertikal ver¬ 
schoben werden, seine vorge- 
wähite Größe kann nicht geän¬ 
dert werden. Einen Screen zu 
schaffen, ist recht einfach. Man 
definiert eine Struktur, in der die 
gewünschten Parameter einge¬ 
tragen werden. Dann ruft man 
OpenScreenQ auf. Die Funk¬ 
tion gibt einen Zeiger zurück 
oder NULL, wenn etwas schief¬ 
ging. Dieser Zeiger muß dann 
als ein Parameter in die Win¬ 
dow-Struktur eingetragen wer¬ 
den. Die wesentlichen Screen- 
Parameter sind die Auflösung 
(der Amiga kennt derer vier) 
und die Tiefe, womit die Anzahl 
der Bit-Planes gemeint ist. Mit 
einer Tiefe von zum Beispiel 3 
sind 2^ = 8 Farben möglich. 

Ein Window wird sinngemäß 
wie ein Screen geöffnet, nur 
daß jetzt hierfür eine Window- 
Struktur definiert werden muß. 
Generell ist das Window das 
Element, das am mächtigsten 
ist, und mit dem Sie wohl auch 
am meisten umgehen werden. 
Es ist zum Beispiel nicht unbe¬ 
dingt nötig, einen Screen zu öff¬ 
nen. Trägt man nämlich in der 
Window-Struktur für den Para¬ 
meter Screen NULL ein (und 
als Typ WBENCHSCREEN), 
wird automatisch der Work- 
bench-Screen benutzt. 

Nun aber gleich mit Listing 16 
zur Preixis. Das Programm soll 
ein Window auf den Schirm 
bringen und in das Window ei¬ 
nen Text schreiben (zeichnen). 
Das Fenster soll auf dem Bild¬ 
schirm verschiebbar sein, sei¬ 
ne Größe darf geändert wer¬ 
den. Das Programm soll enden, 
wenn die Close-Box des Fen¬ 
sters angeklickt wird. 

Dazu öffne ich zwei Libraries, 
nämlich Intuition und Graphics. 
Generell braucht man immer 
beide, ihre B^sis-Zeiger sollte 
man sofort sichern, die werden 
häufig benötigt. Die Exec-Libra- 
ry ist sowieso immer dabei. Das 
obligatorische 

move.l SysBase,a6 
jsr _LV0xxx(a6) 

ist im Makro 
CALLEXEC XXX 

versteckt. 

Sinngemäß funktioniert der 
Makro CALLINT, der eine Funk¬ 
tion der Intuition-Library aufruft. 
Intuition ist für die komplexen 


LINKLIB HACRO 

IFNE 

NARG-2 



FAIL —— 

Makro LINKLIB: Nicht 2 Argumente —— 


EMDC 

MOVE.L 

A6,-(SP) 



MOVE.L 

\2.A6 



JSR 

_LV0\1(A6) 



MOVE.L 

ENDM 

{SP)+,A6 


prlnt HACRO 

IFNE 

NARG-3 



FAIL- 

Makro prlnt: 

Nicht 3 Argumente —— 


ENDC 

MOVE.L 

\1,D1 

;Ausgabe-Handle 


MOVE.L 

\2,D2 

;Addrees Text 


MOVEQ 


jLaenge Text 


LINKLIB Mrlte,_DOSBaae 

jPunktion "Schreiben" 


ENDM 



Listing 15. Die Makros, die vom Listing 14 

eingebunden werden 
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* windowl 



moveq.1 

#l,d0 

jin Maske 




Isl.l 

dl,dO 

jkonvertieren 

* In diesen Flies 

stecken diverse Deklarationen und Makros. 

CALLEXEC 

Walt 

jSchlaf gutl 

« Schauen Sie mal 

reinl 





Incdir " 

include/" 


* Fenster schliessen 


Include intultlon/intuitlon.i 


move. 1 

windowptr,aO 

jwir sind wieder wach 

Include lntultlon/lntultion_llb.l 

CALLINT 

CloseWindou 

;Fenster zu 

Include exec/exec_lib.i 





include graphlcs/graphics_lib. 

1 







• Libraries schliessen 


* Intuition Library oeffnen: 





»_ 



closegraf 



lea 

Intnarae.al 


move.1 

_GfxBase,al 


moveq 

#0,d0 


CALLEXEC 

CloseLlbrary 


CALLEXEC 

OpenLibrary 





tst.l 

dO 


closeint 



beq 

abbruch 


move. 1 

_IntuitionBase,al 


move.1 

dO,_IntuitlonBaae jBasls-Zeiger sichern 

CALLEXEC 

CloseLlbrary 


* Ggraphics Library oeffnen 


abbruch 






move.1 

#0,d0 

;oder normales Ende 

lea 

grafname.al 


rts 



moveq 

#0,d0 





CALLEXEC 

OpenLibrary 


W_0adget8 equ 

WINDOWSIZINGJWINDOUDRAGIWINDOWDEPTHIWINDOWCLOSE 

tst.l 

dO 


W_Extras equ 

SHART_REFRESHIACTIVATE 

beq 

closeint 





move.1 

dO,.CfxBase 

;Basls-Zelger sichern 

W.Tltle dc.b 

'Fenster-Titel' 

0 

» Window oeffnen 



windowdef 



»_ 



dc.w 

200,50 

jllnks, oben 

lea 

windowdef,aO 

;zeige auf Window-Struktur 

dc.w 

300,100 

{Breite, Hoehe 

CALLINT 

OpenWindow 

;oeffne Window 

dc.b 

-1,-1 

;Pens des Screen 

tst.l 

dO 

{ging was schief? 

dc.l 

CLOSEWINDOW 

{einziges IDCMP Flag 

beq 

closegraf 

;uenn Ja 

dc.l 

W_GadgetsIW_Extras jWindow Flags 

move.1 

dO,windowptr 

jWindow-Zeiger sichern 

dc.l 

0 

{keine User-Gadgets 




dc.l 

0 

{keine User-Checkraark 

* Text im Fenster zeichnen 


dc.l 

W_Title 

{Titel des Window 




dc.l 

0 

{kein eigener Screen 

moveq 

#100,dO 

}X-Positlon 

dc.l 

0 

{keine Super Bitmap 

moveq 

#50,dl 


dc.w 

100,20 

{Min. Groesse 

move.1 

windowptr,al 

;Vla Window-Zeiger 

dc.w 

640,200 

{Max. 

move.1 

W(OPort(al),al 

;Rast-Port-Adresse holen 

dc.w 

WBENCHSCREEN 

{Use Workbench Screen 

CALLGRAF 

Move 

jFunktIon Move to X,Y 







Intname 

INTNAME 

{Name Intuition Lib 

move.1 

windowptr,al 

;brauche wieder Rastport 



{via Makro) 

move.1 

wd_RPort(al),al 


grafname 

GRAFNAME 

' {Name Graphics Lib 

lea 

msg,a0 

;Adresse Text 




moveq 

#maglen,d0 

;seine Laenge 

msg 

dc.b 

'Hello, World! ' 

CALLCRAF 

Text 

;und ausgeben 

msglen 

equ 

»-msg 

* Auf Event warten {kann hier nur WINDOWCLOSE sein) 

-IntultionBase 

ds.l 

1 {Speicher fuer Zeiger 

»_ 



_GfxBase 

ds.l 

1 

move.1 

windowptr,aO 

;zeige auf Window-Struktur 

windowptr 

ds.l 

1 

move.1 

wd_UserPort(aO),aO 

;nun auf Message-Port 




move.b 

MP_SIGBrT(aO),dl 

jAnzahl Signal Bits -> dl 

Listing 16. Ein erstes Intuition-Window 


Dinge, wie Fenster zuständig, 
Graphics hingegen für die 
Grundroutinen (Zeichnen von 
Linien, Flächen oder Texten). 

Um ein Window zu öffnen, 
reicht der einfache Aufruf, wie 
im Listing gezeigt. Alles Weitere 
steht in der Struktur ab Label 
»windowdef«. Als einziges 
IDCMP-Flag habe ich CLOSE- 
WINDOW angegeben. Das 
heißt, nur wenn der User das 
Fenster schiießt, meldet mir das 
Intuition. Alle anderen Events 
(Ereignisse) behandelt Intuition 
selbst. Natürlich kann man 
noch weitere Events zulassen, 
zum Beispiel MOUSEBUT- 
TONS oder MOUSEMOVE, um 
nur einige zu nennen. 

In der Folgezeile steht, was 
Intuition zu bearbeiten hat, 

nämlich Window_Gadgets 

und Extras. Ich habe das ein 


paar Zeilen höher als Equates 
hingeschrieben. Beide Equates 
hätten auch im »dc.l« stehen 
können, nur wäre dann das Li¬ 
sting zu breit geworden. In der 
ersten Equate-Zeile stehen die 
Window-Gadgets, die installiert 
werden sollen. Die symboli¬ 
schen Namen (aus dem In- 
ciude-File) sind wohl eindeutig. 

In der nächsten Zeile habe 
ich dem Window noch zwei Ei¬ 
genschaften verpaßt. Smart 
Refresh heißt, daß der betroffe¬ 
ne Inhalt des Fensters gerettet 
werden soll, wenn es von einem 
anderen ganz oder teilweise 
überdeckt wird. Sobald das 
Fenster wieder oben liegt oder 
der abgedeckte Teil wieder 
sichtbar wird, zeichnet Intuition 
den Fensterinhalt neu. Im Ge¬ 
gensatz dazu gibt es noch Sim¬ 
ple Refresh. In diesem Fall mel¬ 


det Intuition nur den »Scha¬ 
den«. 

Nach dem Öffnen des Fen¬ 
sters kann man im Fenster 
zeichnen. Mit MoveQ wird die 
Zeichenposition gesetzt, mit 
TextQ ab dieser Stelle ein String 
ausgegeben. In beiden Fällen 
muß man den RastPort wissen. 
Graphics benötigt immer die 
Adresse des RastPorts, dem 
ein Window zugeordnet ist. Ein 
RastPort ist vereinfacht ausge¬ 
drückt eine Struktur, die die Zei¬ 
chenbedingungen etwas aus¬ 
führlicher beschreibt, als ein 
Fenster. Seine Adresse kann 
man sich mit 

move.l wd_RPort(Al),A1 

holen, wenn vorher der Win¬ 
dow-Zeiger in A1 geladen wur¬ 
de. Dahinter stecid immer eine 
Technik, die ich Ihnen an fol¬ 


genden Zeilen (Auszug aus 
dem Listing) verdeutlichen 
möchte: 

move.1 windowptr,aO 
;zeige auf Window- 
Struktur 

move.l wcLUserPort(aO), 
aO ;nun auf Message-Port 
move.b MP_SIGBIT(aO),dl 
;Anzahl Signal Bits -> 
dl 

Unsere Window-Struktur im 
Listing ist nur eine Hilfskon¬ 
struktion. Nach dem Aufruf von 
OpenWindow erhalten wir in DO 
einen Zeiger auf eine ähnliche 
Struktur, die Intuition für uns an¬ 
legt. Unsere Struktur können 
wir danach wegwerfen, ändern, 
den Speicherbereich anders 
belegen oder sie modifiziert für 
ein weiteres Fenster benutzen. 
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Wichtig ist, daß wir uns den 
Zeiger gut merken, hier in der 
Variablen »windowptr«. Die er¬ 
ste der drei Zeilen ist noch ein¬ 
fach: Der Zeiger wird in das Re¬ 
gister AO geladen. Die Konstan¬ 
te »wd_UserPort« ist das Off¬ 

set vom Beginn der Window- 
Struktur auf ein Langwort inner¬ 
halb der Struktur. Dieses Lang¬ 
wort ist aber selbst auch nur ein 
Zeiger auf eine andere Struktur, 
nämlich den Window-User- 
Port. Innerhalb dieser Struktur 
gibt es ein Byte, in dem das 
Message-Port-Signal-Bit notiert 
ist. Genau das brauchen wir. 

Auf diese Art greift man also 
auf einen der beiden IDCM- 
Ports zu. Intuition richtet auto¬ 
matisch zwei dieser Ports zu je¬ 
dem Window ein. Der Em¬ 
pfangs-Port heißt UserPort, 
senden kann man über den 
WindowPort. In diesem Bei¬ 
spiel zwar überflüssig, aber um 
es mal zu zeigen: Benutzt man 
WaitO, muß man sagen, bei wel¬ 
chen Signal-Bits (praktisch Se¬ 
maphoren) man geweckt wer¬ 
den möchte. Da zu jedem Port 
ein Signal-Bit gehört, müssen 
wir natürlich feststellen, wel¬ 
ches unseres ist. Im Feld 

MP_SIGBIT steht, welches Bit 

das ist (als Bit-Nummer), die 
Funktion WaitQ erwartet aber 
eine Maske in DO, in der genau 
dieses Bit gesetzt ist. Deshalb 
lade ich das Register D1 mit der 
Bit-Nummer, lade dann DO mit 1 
und schiebe nun mit LSL diese 
Eins auf den richtigen Piatz. 
Sobald das Bit »klingelt«, wurde 
unser Window angesprochen. 


Da wir als Event nur CLOSE- 
WINDOW zugelassen hatten, 
können wir uns weitere Tests 
sparen und mit dem Schließen 
des Windows sowie aller offe¬ 
nen Libs das Programm been¬ 
den. 

Fast alle Programme, die wir 
bisher geschrieben haben, 
konnten wir nur mit ihren Na¬ 
men im CLI aufrufen. Das ist 
nicht die schlechteste Lösung, 
denn viele CLI-Kommandos 
sind auch nur Programme die¬ 
ser Art, doch Sie wissen selbst, 
daß der Amiga mehr kann. 

Programm- 

Betriebsarten 

Sie wissen auch, daß jedes 
CLI (mit NEWCLI können Sie 
zusätzliche CLI’s schaffen) ein 
Task ist. Unsere Programme 
waren für den CLI-Task, von 
dem aus sie aufgerufen wur¬ 
den, praktisch nur Unterpro¬ 
gramme. Solange unser Pro¬ 
gramm lief, also zum Beispiel 
auf eine Eingabe wartete, war 
auch das CLI in diesem Unter¬ 
programm und wartete. 

Die nächsthöhere Stufe ist 
ein Programm, das im CLI mit 
»RUN Name« aufgerufen wer¬ 
den kann. Dieses Programm 
läuft dann wirklich als eigener 
Task, und das CLI ist wieder frei 
für andere Dinge. 

Die höchste Stufe bilden 
dann Programme, die man von 
der Workbench aus starten 
kann, indem man einfach mit 
der Maus auf ihr Icon klickt. Ziel 


dieses Kapitels ist es, ein sol¬ 
ches Programm zu erstellen, 
und natürlich zu zeigen, wie 
man dazu vergehen muß. 

Bei der Gelegenheit sollen 
gleich zwei Fliegen mit einer 
Klappe erschlagen werden. Es 
gibt da noch eine Art von Pro¬ 
grammen, nämlich solche, die 
sowohl vom CLI als auch von 
der Workbench aus gestartet 
werden können. Ich glaube, wir 
sind uns einig, daß jedes 
Workbench-Programm auch 
unter dem CLI laufen sollte, 
folglich können wir auf die Lö¬ 
sung »Nur Workbench« getrost 
verzichten. Wie Sie gleich se¬ 
hen werden, ist die damit erziel¬ 
bare Einsparung auch nur mini¬ 
mal. 

Fassen wir zusammen. Es 
gibt: 

1. CLI-Unterprogramme (Aufruf 
mit Namen), 

2. CLI-Tasks (Aufruf mit RUN 
Namen), 

3. Workbench-Tasks (Klick auf 
das Icon), 

4. Kombination von 2. und 3. 

Die Gruppen 1 und 2 unter¬ 
scheiden sich nur minimal. 
Gruppet benutzt für die Einga¬ 
be und Ausgabe das CLI-Win- 
dow. Das Handle dafür wird mit 
der DOS-Funktion Input bezie¬ 
hungsweise Output ermittelt. 

Gruppe 2 arbeitet nicht mit 
diesen Handles, sondern mit ei¬ 
nem eigenen Fenster. Die Pro¬ 
gramme im Abschnitt »Verzwei¬ 
gungen und Menütechnik« (Li- 
sting 10,11,12,13) gehören da¬ 
zu. Probieren Sie es aus und 
starten diese Programme mit 


»RUN Name«. Achten Sie aber 
bitte darauf, daß Sie immer erst 
mit der Maus das Fenster an¬ 
klicken müssen, in dem Sie ar¬ 
beiten wollen. Wenn Sie genau 
hinsehen, werden Sie feststel¬ 
len, daß auf dem Schirm nach 
dem Aufruf auch »CLI2« steht. 
Praktisch heißt das: CLI 1 rich¬ 
tet für das Programm temporär 
(solange es läuft) ein neues CLI 
ein. 

Workbench-Programme 
(Gruppe 3) müssen eine Zu¬ 
satzbedingung erfüllen. Sie 
dürfen nicht einfach loslaufen, 
wann Sie wollen, sondern müs¬ 
sen sozusagen auf die Starter¬ 
laubnis der Workbench warten. 
Deshalb müssen solche Pro¬ 
gramme zu Beginn auf eine 
Message (den Startbefehl) war¬ 
ten. Wenn Sie fertig sind, müs¬ 
sen Sie das der Workbench 
melden, indem Sie genau diese 
Message (die Sie sich gut ge¬ 
merkt haben) an die Work¬ 
bench zurückschicken. 

Wird dasselbe Programm 
vom CLI aus aufgerufen, ent¬ 
fällt natürlich diese Geschichte. 
Das heißt auch, daß unser Pro¬ 
gramm unterscheiden muß, von 
wo es aufgerufen wurde. 

Der Trick hinter der ganzen 
Geschichte ist der sogenannte 
Startup-Code. Der Name ist 
nicht ganz korrekt, hat sich je¬ 
doch so eingebürgert. Zum 
Start-Code gehört nämlich im¬ 
mer auch ein Ende-Code. Um 
nun beides in einen einzigen Fi¬ 
le packen zu können, den man 
bei HiSoft und SEKA als 
Include-File zuerst lädt und bei 


* startup.l 


* _ 





fromWorkbench 



* Startup-Code fuer Assembler-Programme. 

Recht frei nach dem 

lea 

pr_MsgPort(a4),aO 


» Beispiel im ROM-Kemel-Manual Libraries 

and Devices, aber so 

CALLEXEC 

WaltPort 

;Warte auf Start-Message 

• geschrieben, dass als Include-Flle brauchbar und auf das 

lea 

pr_MsgPort(a4),aO 

;sle ist da 

* wirklich notwendige reduziert 


CALLEXEC 

GetMsg 

;hole sie 



move.1 

dO,_WBenchMsg 

jimmer Msg sichern! 

incdlr ”:include/" 


movem.1 

(sp)+,d0/a0 

;bringe Stack 1.0. 

inolude "exec/exec_llb.l’ 


run 



include "libraries/dosextens.l 


bsr.s 

_maln 

;rufe unser Programm auf 

raovem.l d0/a0,-(sp) 

;rette Kommandozeile 

move.1 

d0,-(sp) 

jrette seinen Return-Code 

clr.l _WBenohMsg 

;sicherheitshalber 

tst.l 

_WBenchMsg 

;gibt's eine WB-Message 

* Teste, von wo wir gestartet wurden 


beq.s 

_exlt 

;nein: dann war's CLI 

sub.l al,al 

;al=0 = eigener Task 

CALLEXEC 

Forbid 

jkeine Unterbrechung 

CALLEXEC FindTask 

!Wo sind wir? 




move.l d0,a4 

jAdresse retten 

move.1 

_WBenchMsg(pc),al 

jhole die Message 



CALLEXEC 

ReplyHsg 

;und gib sie zurueck 

tst.l pr_CLI(a4) 

;Laufen wir unter WB? 

_exlt 



beq.s fromWorkbenoh 

jwenn so 

move. 1 

(sp)+,d0 

;hole Return-Code 



rts 


;das war's 

* Wir wurden vom CLI gestartet 





»_ 


_WBenohHag 



movem.l (sp)+,d0/a0 

jParms Kommandozelle 

ds.l 

1 



holen 

enop 

0,2 


bra run 

!und starten 




* Wir wurden von Workbench gestartet 


Listing 17. Der sogenannte Startup-Code 
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opt 

• free.ram 


1 - 


incdir 'linclude/' 

include startup.i 

include Intuitlon/intultion.i 
include lntuition/irtultion_llb.l 
Include exec/memory.i 
include graphloa/graphles_lib.i 
include libraries/dos.lib.i 


GRAFIC macro 


jnain 


move.1 wlndowptr,al 
move.l wd_RPort(al),al 
CALLGRAF \1 

endni 


* DOS-Library oeffnen 

» _ 

lea 

raoveq 

CALLEXEC 

tst.l 

beq 

move.1 


dosnaRie,al 

#0,d0 

OpenLibrary 

dO 

Abbruch 

dO,_DOSBase 


* Intuition Library oeffnen: 


lea 

moveq 

CALLEXEC 

tst.l 

beq 

move.1 


intname.al 

#0,d0 

OpenLibrary 

dO 

closedos 

dO,_IntuitionBase 


« Graphics Library oeffnen 
*_ 


lea 

moveq 

CALLEXEC 

tst.l 

beq 

move.1 


* Window oeffnen 

» _ 

lea 


Struktur 


CALLINT 


grafname,al 

#0,d0 

OpenLibrary 

dO 

closeint 

dO,_GfxBase 


vindovdef,aO 

OpenWindow 


;nicht linken! 


{Oder wie Sie ihn nennen 


jAdresse Window-Struktur 
;von da auf Rast Port 
; Grafik-Funktion 


jBasis-Zeiger sichern 


;Basis-Zeiger sichern 


jBasis-Zelger sichern 

;zeige auf Windou- 
joeffne Window 


Metacomco mit dem Linker vor 
sein Programm setzt, kommt 
wieder ein kleiner Trick zum Tra¬ 
gen. Normalerweise hieße die 
Folge: 

Start-Code 

Unser Programmteil 

End-Code 

Praktisch gehen wir aber so 
vor: 

Start-Code 
jsr _main 
End-code 

_inaln Unser Programmteil 
rts 

Sie wissen jetzt, warum ich in 
all meinen Listings die Label 
»_main« an den Anfang ge¬ 

setzt habe (wenn Sie sie nicht 

sehen, _main steckt im In- 

clude-FileOpenDOS.i). Bei Me¬ 
tacomco sollten Sie auf jeden 

Fall mit »_main« arbeiten, der 

Linker erwartet dies, wenn Sie 
»startup.o« einbinden. Auch 
dürfte jetzt klar sein, daß unsere 
Programme immer mit einem 
schlichten aber wichtigen »rts« 
enden müssen. 

Doch nun zur Praxis. Listing 
17 zeigt das Startup. I^rn der 
Angelegenheit sind diese Zei¬ 
len: 

sub.l al,al 
;al=0 = eigener Task 
CALLEXEC FlndTask 
wo sind wir? 
move.l d0>a4 
;Adresse retten 
tst.l pr_CLI(a4) 

;Laufen wir unter WB? 
beq.s fromWorkbench 
;wenn so 

Die Exec-Funktion »Find- 
Task« findet die Adresse einer 
Task-Kontroll-Struktur. Norma¬ 
lerweise übergibt man der 
Funktion die Adresse eines 
Strings mit dem Task-Namen 
im Register al. Ist dieser Zeiger 
Null, erhält man die Adresse 
des eigenen Tasks. 

Nun muß ich leider gestehen, 
daß hier »Task« nicht korrekt ist. 
Wir laufen unter einem DOS- 
Prozeß. Ein Prozeß ist so etwas 
Ähnliches wie ein Task, nur hö¬ 
herwertiger. »FindTask« gibt 
deshalb die Adresse unseres 
PLB (Prozeß-Leit-Block) zu¬ 
rück. Wenn Sie sich diese 
Struktur ansehen möchten: sie 
steht im Include-Fiie »include/ 
libraries/dosextens.i«. 

Innerhalb dieser Struktur gibt 
es den Eintrag mit dem Offeet 

»pr_CLI«. Das soll heißen 

»Pointer (Zeiger) auf den Com- 
mand Line Interpreter«. Dieser 
Zeiger ist Null, wenn wir unter 
der Workbench laufen. 

Also geht es in diesem Fall 
zur Label »fromWorkbench« 
und da steht: 


fromWorkbench 
lea pr_MsgPort(a4),aO 

ALLEXEC WaitPort 
jWarte auf Start-Message 
lea pr_MsgPort(a4), 
aOjsle ist da 
CALLEXEC GetMsg 
;hole sie 

move.1 dO,_WBenchMsg 
;immer Msg sichern! 

Im PLB beim Offset »pr_ 

MsgPort« steht die Adresse, die 
Exec-Funktion »Waitport« se¬ 
hen will. Dieser Aufruf läßt un¬ 
seren Task warten, bis er an die 
Reihe kommt. Stellen Sie sich 
das so vor: Es gibt eine Liste al¬ 
ler laufenden Tasks. Exec sorgt 
dafür, daß einer nach dem an¬ 
deren für eine gewisse Zeit an 
die Reihe kommt, denn prak¬ 
tisch kann ja immer nureinTask 
laufen (wir haben nur einen 
68000 im Amiga). Seinen Start- 
befehi erhält der TASK über die¬ 
sen Message-Port, genau: nur 
die Nachricht, daß eine Messa¬ 
ge da ist. Deshalb muß man mit 
»GetMsg« diese Nachricht aus 
dem Port lesen. Sie steht da¬ 
nach im Register dO. Da wir die¬ 
se Nachricht noch brauchen, 
sichern wir sie in der Variablen 
»_WBenchMsg«. 

Wenn unser Task unter der 
Workbench läuft, und er »ge¬ 
weckt« wurde, sind die Zeilen 
ab dem Label »run« interessant. 

Mit »bsr _main« wird nun 

endlich unser Programmteil 
aufgerufen. Danach erfolgen 
die Rückzugsgefechte, das, 
was ich in der Einleitung den 
Ende-Code genannt habe. Wir 
müssen uns bei der Workbench 
ordnungsgemäß abmelden, 
was an sich dadurch geschieht, 
daß wir mit »ReplyMsg« die ur¬ 
sprünglich beim Start erhaltene 
Message zurückgeben. Da 
auch andere Tasks theoretisch 
zur selben Zeit auf den PLB zu¬ 
greifen können, könnte es sein, 
daß unsere Nachricht nicht an¬ 
kommt oder schlimmer, das to¬ 
tale Chaos ausbricht. 

In einem Multitaskingsystem, 
in dem verschiedene Tasks auf 
gemeinsame globale Variable 
zugreifen können, gibt es des¬ 
halb immer einen Mechanis¬ 
mus, der einem Task für eine 
gewisse Zeit das alleinige Zu¬ 
griffsrecht sichert. Diese Funk¬ 
tion heißt beim Amiga Fbrbid 
(Verbiete mir Störungen). Ge¬ 
naugenommen ist diese Funk¬ 
tion recht gefährlich, denn sie 
schaltet das Multitasking aus. 
Es bleibt ausgeschaltet, solan¬ 
ge der Task läuft oder bis er 
Walt (warte auf Nachricht) oder 
Permit aufruft. Da wir nach dem 
Forbid nur noch die Reply- 
Message zurückgeben und 


dann enden, ist das »Forbid- 
ding« hier vertretbar (und not¬ 
wendig sowieso). 

Nach dem »bsr_main« hat¬ 

ten wir noch mit 

move.l dO,-(sp) 
den Return-Code unseres Pro¬ 
gramms gesichert. Es ist unse¬ 
re Sache, was wir da zurückge¬ 
ben wollen. Üblich ist Null für 
keinen Fehler. Dieses »dO« 
müssen wir natürlich vor dem 
RTS wieder vom Stack holen. 
Genauso hatten wir gleich zu 
Anfang des Programms mit 

movem.1 dO/aO,-(sp) 

;rette Kommandozeile 
clr.l _UBenchMsg 
jsicherheitshalber 

die Länge und Adresse einer 
eventuellen Kommandozeile 
gesichert und die Variable 
_WBenchMsg auf null ge¬ 


setzt. Das Aufräumen des 
Stacks mit 

movem.1 (sp)+,dO/aO 

erfolgt dann jeweils entweder 
im CLI- oder im Workbench- 
zweig. 

Schauen wir uns zum Schluß 
noch an, was denn tatsächlich 
im Falle von CLI geschieht, so 
bleibt: 

run bsr.s _main 

rts 

Wenn Sie diesen Quelltext 
nun assemblieren, müßte das 
mit einer Ausnahme ohne Feh¬ 
ler über die Bühne gehen. Die 
Ausnahme ist das fehlende La¬ 
bel »_main«. Nun speichern 

Sie diesen File bitte unter dem 
Namen »startup.i« 

Um einmal zu zeigen, daß 
einer unserer Tasks tatsächlich 
ständig läuft und etwas tut, wol- 
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Kurse 


tst.l 

dO 

;ging was schief? 

* Konvertiere d2.1 

in ASCII-String ab (aO) 


beq 

closegraf 

;venn ja 





move.1 

dOjWindowptr 

;Window-Zeiger sichern 

hex 







moveq 

#8-1,dl 


{nun alle Nibble 

* Hauptschielfe 



next 




*_- _ 



rol.l 

#4,d2 


{hole 1 Nibble 

loop 



move.1 

cl2,d3 


{nach d3 retten 

moveq 

#MEMF_PÜBLIC,dl 

;freien RAM 

and.b 

#S0f,d3 


{maskiere es 

CALLEXEC 

AvailMem 

jelnlesen 

add.b 

#48,dj 


{in ASCII wandeln 

move.1 

d0,d2 

mach d2 

crap.b 

#58,d3 


{ist es >9 ? 

lea 

buffer.aO 

in Hex-String 

bes 

out 


{Wenn nicht 

bsr 

hex 


addq.b 

#7,d3 


{sonst muss es A-F sein 




out 




moveq 

#80,dO 

;X-Positlon fuer Text 

move.b 

d3,(a0)+ 


{1 Zeichen abspeichern 

raoveq 

#19,dl 

JY 

dbra 

dl,next 


{next nibble 

GRAFIC 

Move 

jMove TO X,Y 

rts 




lea 

buffer.aO 

;Text-Adresse 





addq.l 

#2,a0 

jdie 2 ersten Nibble sind 

W_Gadgets 

equ 

WINDOWDRAGIWINDOWDEPTH!UINDOWCLOSE 

moveq 

#6,d0 

jeh 0, restliche 6 reichen 

W_£xtras 

equ 

SHARTJIEFRESH1ACTIVATE 

GRAFIC 

Text 

jText zeichnen 








W.Tltle 

dc.b 

’ Freier RAM z.Z. ’,0 

move.l 

«Indowptr,aO 

iVon unserem Window 





move.l 

wd_UeerPort(aO),aO 

;den Empfangsport 

windowdef 




CALLEXEC 

GetMsg 

{testen 


dc.w 

200,20 

{links, oben 

tst.l 

dO 

{Haben wir Post? 


dc.u 

220,24 

{Breite, Hoehe 

bne 

fini 

{kann nur CLOSEWINDOW sein 


dc.b 

-1,-1 

{Pens des Screen 





dc.l CLOSEWINDOW 

{elnlziges IDCHP Flag 

move.1 

#25,dl 

{25/50 - 1/2 Sekunde 


de.1 W_Gadgets!W_Extras{Window Flags 

CALLDOS 

Delay 

{warten 


dc.l 


{keine User-Cadgets 

bra 

loop 

{und von vorn 


dc.l 

0 

{keine User-Checkmark 





dc.l 

W.Title 

{Titel des Window 

fini 




dc.l 


{kein eigener Screen 

move.1 

d0,al 

{Message ist in dO 


dc.l 

0 

{keine Super Bitmap 

CALLEXEC 

ReplyMsg 

{antworten 


dc.w 

100,20 

{Hin. Groesse 





dc.w 

640,200 

{Max. 

oloseulndow 




dc.w WBENCHSCREEN 

{Use Workbench Screen 

move.l 

wlndowptr,aO 

{Fenster zu 





CALLINT 

CloseWindow 


intname 

INTNAME 


{Namen der Libs aus Makros 




grafname 

GRAFNAME 



cloeegraf 



dosname 

DOSNAHE 



move. 1 

_GfxBase,al 

{Die Libs schliessen: 





CALLEXEC 

CloseLibrary 


buffer 

ds.b 

8 


closeint 



.IntultionBase 

ds.l 

1 

{Speicher fuer die Zeiger 

move.l 

_IntultlonBase,al 


_CfxBase 

ds.l 

1 


CALLEXEC 

CloseLibrary 


_DCSBase 

ds.l 

1 





windowptr 

ds.l 

1 


closedos 







move.l 

_D0SBase,al 






CALLEXEC 

CloseLibrary 






abbruoh 

#0,d0 


Listing 18. Dieses Programm zeigt Immer den freien 

rts 


{und Ende 

Speicherplatz 





len wir nun ein Programm 
schreiben, das in einem Win¬ 
dow ständig den noch freien 
RAM anzeigt (Listing 18). 

Nachdem alle Libraries, die 
wir hier benötigen, geöffnet 
sind, kann es losgehen. Der 
Kern des Programms steckt in 
den fünf Zeilen ab »loop«. Wir 
holen uns den freien Speicher, 
indem wir der Exec-Funktion 
»AvailMem« die Konstante 
>>MEMF_PUBLIC« überge¬ 
ben. Diese Konstante ist im 
Include-File »include/exec/me- 
mory.i« mittels EQU definiert. 
Sie werden dort auch noch eini¬ 
ge andere Parameter finden. 
Machen Sie sich einmal den 
Spaß, und ändern das Pro¬ 
gramm so, daß auch die Größen 
von Fast-RAM, Chip-RAM etc. 
angezeigt werden. 

Nun folgt die Hex-Konvertie- 
rung, die Sie schon kennen. 


und die Ausgabe des Textes, 
wie im Beispiel von Listing 16. 
Neu ist nur der Makro GRAFIC, 
der mir einiges an Tipperei er¬ 
spart. Auch anders ist das War¬ 
ten auf ein Intuition-Event ge¬ 
löst. Auch hier erwarten wir nur 
gemäß unserer Window-Defini¬ 
tion nur eines, nämlich CLOSE- 
WINDOW. 

Wie Sie sehen, reicht es, mit 
»CALLEXEC GetMsg / tst.l dO« 
einfach den Message-Port zu 
lesen. Ist der »Briefkasten« leer, 
ist dO null, Normaler ist diese 
Methode des sogenannten Pol¬ 
lings unschön, doch hier geht 
es, weil wir im Falle von keine 
Nachricht mit diesen Zeilen 
weitermachen: 

move.l #25,01 
;25/50 = 1/2 Sekunde 
CALLDOS Delay ;warten 
bra loop 


;und von vorn 

Mit dem Aufruf der Delay- 
Routine geben wir nämlich den 
anderen Tasks für eine halbe 
Sekunde Zeit (aus CPU-Sicht 
die reinste Ewigkeit) selbst et¬ 
was zu tun. Wenn alle halbe Se¬ 
kunde der neue Stand des 
RAM angezeigt wird, dürfte es 
wohl reichen. Wer schneller in¬ 
formiert sein will, kann die Zeit 
natürlich kürzer wählen. 

Wurde das Close-Gadget 
des Fensters angeklickt, dann 
haben wir eine Message erhal¬ 
ten und es erfolgt ein Sprung 
zum Label »fini«. Dort steht; 
fini move.l dO,al 
jMessage Ist in dO 
CALLEXEC ReplyMsg 
;antworten 

und das möchte ich Ihnen noch 
einmal besonders ans Herz le¬ 


gen. Wir müssen Intuition auf 
jede Nachricht antworten! Das 
geschieht ganz einfach durch 
den Vermerk »zurück an Ab¬ 
sender«, sprich wir senden die 
eben erhaltene Nachricht zu¬ 
rück. 

Ist das Programm (fehlerfrei) 
assembliert und heißt das Er¬ 
gebnis »free_ram«, dann kön¬ 

nen Sie jetzt ins CLI gehen und 

»run free_ram« tippen. Nun 

sollte das Fenster mit der Anzei¬ 
ge erscheinen. Um nun ein CLi- 
Kommando ausführen zu kön¬ 
nen, müssen Sie zuerst irgend¬ 
wo im CLI-Fenster klicken. Ge¬ 
ben Sie nun DIR ein, und Sie 
werden sehen, wie sich die 
Speicheranzeige ständig än¬ 
dert, solange DIR läuft. 

Einen kleinen Fehler hat un¬ 
ser Programm noch. Wir wollen 
ja in sein Fenster nichts einge¬ 
ben, warum also ist das Fenster 
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aktiv, und warum müssen wir 
erst das CLI-f=enster anklicken? 
Die Lösung ist recht einfach. 
Ändern Sie die Zeile 

W_Extras equ 

SMART_REFRESH1ACTIVATE 
in 

W_Extras equ 

SMART_REFRESH 

Damit ist das Fenster nicht 
mehr aktiv, sein Titel wird dann 
in Geisterschrift dargestellt. Sie 
können es natürlich anklicken, 
wenn Ihnen die aktive Form 
besser gefällt. 

Um ein Programm, das mit 
einem ordentlichen Startup- 
Code versehen ist, von der 
Workbench aus starten zu kön¬ 
nen, benötigt es nur noch ein 
Icon. Damit ein Icon sichtbar 
wird, muß es erstens vorhan¬ 
den sein (logisch) und zweitens 
in einem Directory stehen, das 
selbst ein Icon hat. Am einfach¬ 
sten stellen Sie eine solche 
Schublade her, indem Sie auf 
der Workbench die Schublade 
»Empty« duplizieren. Sehen Sie 
deren Icon nicht, schließen Sie 
das Disk-Fenster und öffnen es 
wieder. Nun ziehen Sie die 
Empty-Schublade etwas weg, 
und die Test-Schublade ist da. 

Jetzt brauchen wir ein Pro¬ 
gramm-Icon. Dazu nehmen Sie 
am besten auch ein vorhande¬ 
nes Icon, allerdings nicht jedes 
ist geeignet. Der Amiga kennt 
verschiedene Typen von Icons. 
Welche das sind und was sie für 
eine Bedeutung haben, erfah¬ 
ren Sie automatisch, wenn Sie 
den Icon-Editor starten. Für uns 
ist es wichtig, zu wissen, daß 
Programme vom Typ TOOL 
sein müssen. 

Geeignet ist zum Beispiel 
IconED selbst. Nehmen wir an. 
Sie haben das Directory (die 
Schublade) »test« schon erstellt 
und unser Programm hieße 

»free_ram«. Dann kopieren 

Sie zuerst das Programm mit 
copy free_rara : 
test/free_ram 

Nun kopieren Sie ein Icon da¬ 
zu (IconEd steckt im System- 
Ordner): 

copy rsystem/iconed. 
info :test/free_ram.info 

Nun sollten Sie auf der Work¬ 
bench in der Schublade »test« 
ein Icon finden, das aussieht, 
wie das von IconEd, aber den 

Titel »free_ram« zeigt. Dieses 

können Sie nun getrost an¬ 
klicken, »free_ram« wird an¬ 

schließend starten. 

Wenn Sie jetzt Ihrem Icon ein 
eigenes Aussehen verpassen 
wollen, rufen Sie IconEd auf. Im 
Disk-Menü wähien Sie LOAD 


und tippen dann in den Text- 

Requester 

:test/free_rain 

(immer den volien Pfadnamen). 

Das Editieren ist im Prinzip 
selbsterklärend. Probieren Sie 
einfach die verschiedenen 
Menü-Punkte aus. 

Um ein Icon zeichnen/än¬ 
dern zu können, müssen Sie 
immer das Menü Color anwäh¬ 
len und daraus die passende 
Farbe. Radieren können Sie mit 
der Hintergrundfarbe. Gezeich¬ 


net/radiert wird mit der Maus. 
Die linke Taste drückt den Stift 
auf das »Papier«. Sie können 
auch auf den l^piervorgang 
ganz verzichten und ein Icon 
selbst im Editor erstellen. Sie 
müssen dann nur im Save-Re- 
quester den korrekten Namen 
eingeben: 

test/free_rara 

Ansonsten keine Sorge. Es 
können zwar die unmöglich¬ 
sten Icons entstehen, aber edi¬ 
tiert wird immer nur der Info- 
File. Ihrem Programm passiert 
nichts. 

Fast zum Schluß, aber noch 
rechtzeitig, müssen wir noch 
einmal auf den 68000 zurück¬ 
kommen, aus dessen Befehls¬ 
satz wir bisher nur einen Teil be¬ 
handelt haben. 

In den 68000-Datenbüchern 
finden Sie zu jedem einzelnen 
Befehi die Syntaxformen, die 
erlaubten Adressierungsarten, 
die Längen, die Laufzeiten und 
vieles mehr. So ein Buch mit 
300 Seiten können wir hier lei¬ 
der nicht abdrucken. Trotzdem 
wollen wir Ihnen einen Über¬ 
blickgeben. Meistens kommen 
Sie damit und der Regel »Be¬ 
fehl Quelle,Ziel« schon ganz 
gut zurecht. Zum anderen fin¬ 
den Sie im AMIGA-Magazin 
und im AMIGA-Sonderheft Li- 
stings, die zeigen, wie man die 
Befehle anwendet. Auf den fol¬ 
genden Seiten können Sie 
dann nachlesen, was sie be¬ 
deuten. 

Am häufigsten werden Sie 


die Transfer-Befehle laut Tabel¬ 
le 4 einsetzen. Auffallend sind 
sicherlich die vielen Varianten 
des MOVE-Befehls. Hiersoilten 
Sie einmal Ihren Assembler te¬ 
sten. Gute Assembler akzeptie¬ 
ren auch ein MOVE, wo man ei¬ 
gentlich MOVEA hätte schrei¬ 
ben müssen. Sehr gute Assem¬ 
bler geben sogenannte War- 
nings aus, wenn Sie nicht opti¬ 
mal programmieren, hier also 
anstatt eines zulässigen MO- 
VEQ nur ein einfaches MOVE 


schreiben würden. Besonders 
erwähnenswert sind die LINK 
und UNLK (Unlink). Mit diesen 
Befehlen ist der 68000 beson¬ 
ders gut auf die Aufgabenstei- 
iung von Hochsprachen-Com- 
pilern vorbereitet. Hier ergibt 
sich immer das Problem, daß in 
Prozeduren und Funktionen lo¬ 
kale Variable geschaffen wer¬ 
den müssen, die nur so lange 


existieren sollen, wie die Proze¬ 
dur (Funktion) aktiv ist. Typisch 
werden deshalb solche Varia¬ 
blen auf dem Stack abge- 
legt.ldeal ist es nun, wenn man 
mit nur einem Befehl den pas¬ 
senden Stackbereich reservie¬ 
ren und dann später auf genau¬ 
so einfache Art wieder freige¬ 
ben kann. Genau das bieten die 
Befehle LINK und UNLK. Wenn 
nun eine Prozedur (Unterpro¬ 
gramm) eine weitere Prozedur 
aufruft und diese dann eine drit¬ 
te etc., und jede dieser Proze¬ 
duren mit dem eigenen lokalen 
Stack arbeitet, dann entsteht 
sozusagen eine verkettete Li¬ 
ste, englisch »linked list«. Daher 
rühren auch die Namen LiNK 
und UNLK. 

Schauen wir uns jetzt einmal 
an, wie das funktioniert. Die 
Syntax des Befehls lautet: 
LINK An,#Adreßdistanz 

Ein Beispiel: 

LINK A6, #30 

In diesem Fall wird zuerst A6 
auf dem Stack abgelegt, prak¬ 
tisch der Befehl: 

move.l a6,-(sp) 


(Schritt 1) 

ausgeführt. Nun wird der Stack¬ 
pointer in das soeben gerettete 
Register kopiert: 

move.l sp,a6 
(Schritt 2) 

Zuletzt wird die Adreßdistanz 
auf den Stackpointer addiert: 
add.l #Adr_Dist,sp 


Die Transfer-Befehle des 68 



•TiTi 


Befehl 

Bedeutung 

EXG 

Austausch von Registerinhalten 

LEA 

Laden eines Registers 

LINK 

Lokalen Stack aufbauen 

MOVE 

Übertragen (Kopieren) von Daten 

MOVEA 

Übertragen (Kopieren) von Adressen 

MOVEM 

Übertragen (Kopieren) mehrerer Register 

MOVEP 

Übertragen (Kopieren) von Daten zur Peripherie 

MOVEQ 

Übertragen (Kopieren) von Konstanten »Quick« 

PEA 

Adresse auf den Stack bringen 

SWAP 

Vertauschen der Worte eines Registers 

UNLK 

Abbau des lokalen Stacks (siehe LINK) 


Tabelle 4. Die Itansfer-Defehie des 68000 


Arithmetik-Befehle des 68 



iTiTi 


Befehl 

Bedeutung 

ADD 

Addition von Daten 

ADDA 

Addition von Adressen 

ADDI 

Addition einer Konstanten 

ADDQ 

Addition einer Konstanten »Quick« 

ADDX 

Addition mit Übertrag-Bit 

CLR 

Löschen eines Operanden 

CMP 

Vergleich zweier Daten 

CMPA 

Vergleich zweier Adressen 

CMPI 

Vergleich mit einer Konstanten 

CMPM 

Vergleich zweier Daten im Speicher 

DIVS 

Division mit Vorzeichen 

DIVU 

Division ohne Vorzeichen 

EXT 

Vorzeichenrichtige Erweiterung 

MULS 

Multiplikation mit Vorzeichen 

MULU 

Multiplikation ohne Vorzeichen 

NEG 

Negation 

NEGX 

Negation mit X-Bit 

SUB 

Subtraktion von Daten 

SUBA 

Subtraktion von Adressen 

SUBI 

Subtraktion einer Konstanten 

SUBQ 

Subtraktion einer Konstanten »Quick« 

SUBX 

Subtraktion mit X-Bit (Borgen) 

TST 

Teste Operanden gegen Null 

ABCD 

Addition von BCO-Zahlen 

NBCD 

Negation von BCD-Zahlen 

SBCD 

Subtraktion von BCD-Zahlen 


Tabelle 5. Mächtige Arithmetik-Befehle bietet der 68000 
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Kurse 


Das Prinzip der BCD-Arithmetik 


Zahl Wert im Speicher auf Adressen 

1 123456 12 auf 1001, 34 auf 1002, 45 auf 1003 

2 654321 65 auf 2001, 43 auf 2002, 21 auf 2003 


Tabelle 6. Das Prinzip der BCD-Arithmetik 


move 

#1004,al 

move 

#2004,a2 

move 

#4,CCR 

ABCD 

-(al),-{a2) 

ABCD 

-(al),-(a2) 

ABCD 

-(al),-{a2) 


LIstIng 19. Das Listing zur Tabelle 5 


Damit hätten wir den lokalen 
Stack für ein Unterprogramm. 
Üblicherweise wählt man die 
Adreßdistanz negativ, da der 
Stack zu fallenden Adressen 
hinwächst. Mit UNLK wird der 
ursprüngliche Zustand wieder¬ 
hergestellt. Praktisch wirkt 
UNLK wie 
move.l a6,a7 
raove.l (sp)+,a6 

Für das Hauptprogramm 
oder allgemein das aufrufende 
Unterprogramm hat somit das 
Adreßregister und der Stack¬ 
pointer wieder seinen ur¬ 
sprünglichen Wert. 

Zu beachten ist noch, daß 
das Adreßregister nach dem 
LINK-Befehl eine Kopie des 
Stackpointers hält. Somit kann 
das Unterprogramm sehr ein¬ 
fach auf Daten des aufrufenden 
Programms zugreifen, wenn 
dieses die Daten vorher auf den 
Stack gepackt hat. 

Der 68000 bietet iaut Tabelle 
5 eine Menge sehr leistungsfä¬ 
higer Arithmetik-Befehle, die 
Sie aber nicht unbedingt alle 
beherrschen müssen. Auch 
hier können gute Assembler Ih¬ 


nen einige Arbeit abnehmen. 
Zumindest sollten Sie mit ADD 
einverstanden sein, wenn ei¬ 
gentlich ADDA oder ADDI erfor¬ 
derlich ist. Sinngemäßes gilt für 
CMP und SUB. 

Die arithmetischen Operatio¬ 
nen sind auf einer Brette von 32 
Bit möglich. In diesem Sinne ist 
also der 68000 ein echter 
»32-Bitter«. Sein Datenbus ist 


zwar nur 16 Bit breit, was dazu 
führt, daß Langworte in »zwei 
Portionen« transportiert wer¬ 
den, das interessiert aber nur 
sekundär. Primär ist wichtig, 
daß damit mathematische Ope¬ 
rationen wesentlich einfacher 
zu programmieren sind, als auf 


CPUs, die nur 16 oder gar nur 8 
Bit breite Operanden zulassen. 
Sekundär sollte man natürlich 
darauf achten, daß die Daten 
solange als möglich in Regi¬ 
stern gehalten werden. Dann 
entfällt auch der relativ zeitauf¬ 
wendige Transfer über den Da¬ 
tenbus. 


Bei der hohen Geschwindig¬ 
keit des 68000 sollte man das 
allerdings nicht überbewerten. 
Nur in sehr rechenintensiven 
Routinen könnte damit etwas 
erreicht werden, 

Die BCD-Arithmetik des 
68000 wird jeder schätzen, der 
schon einmal auf einer anderen 
CPU so etwas programmieren 
mußte. Eine BCD-Ziffer steht 


immer in einem Halbbyte (4 
Bits). Da sich damit die Zahlen 
0 bis 15 darstellen lassen, hier 
aber nurp bis 9 gültig sind, gibt 
es beim Überlauf einige Proble¬ 
me. Bei anderen CPUs muß 
man diesen Fall mit Hilfe des 
sogenannten Half-Carry-Flags 
testen, hier kann man einfach 
addieren. Da als Operanden¬ 
größe immer nur Byte zugelas¬ 
sen ist, gibt es den Überlauf 
nach 99. Dieser geht aber auto¬ 
matisch in das X-Flag und wird 
auch immer mitaddiert. 

Tabelle 6 zeigt den Speicher¬ 
auszug und das Programm für 
die Addition zweier sechsstelli¬ 
ger Zahlen in je 3 Bytes. Wie üb¬ 
lich muß man rechts (bei den Ei¬ 
nern) mit der Addition begin¬ 
nen. Daher ist als Adressie¬ 
rungsart hier nur »ARI mit Pre- 
dekrement« erlaubt. 

Dabei sind drei Dinge zu be¬ 
achten: 

1. Wegen des Predekrements 


muß das Byte mit dem »Einer« 
auf einer ungeraden Adresse 
liegen. 

2. Um nicht beim ersten Mal ein 
zufälliges X-Flag mitzuaddie¬ 
ren, muß man es löschen. 

3. Um ein Null-Ergebnis erken¬ 
nen zu können, sollte man vor¬ 
her das Z-Flag setzen. 

Die Punkte 2 und 3 lassen 
sich mit der Anweisung »move 
#4,CCR« sehr einfach zusam¬ 
men erledigen. Eines bleibt Ih¬ 
nen allerdings nicht erspart. Sie 
müssen schon garantieren, daß 
die Zahlen BCD-Zahlen sind 
(Abfrage beim Laden). Größere 
Werte als 9 werden nämlich 
schlicht falsch addiert. 

Der 68000 beherrscht die Lo¬ 
gik-Befehle von Amiga-Basic? 
Nein, tatsächlich ist es umge¬ 
kehrt. Auf jeden Fall brauchen 
wir hier nicht viel darüber zu 
schreiben, denn die Logik- 
Funktionen sind sehr schön im 
Amiga-Basic-Handbuch erklärt. 
Tabelle 7 zeigt also nur die 
68000-Syntax. 

In Assembler ist man häufig 
mit dem »Bit-Schieben« be¬ 
schäftigt. Der 68000 unterstützt 
uns dabei mit den Befehlen, die 
uns Tabelle 8 zeigt. 


Sie müssen nur beachten, 
daß die direkte Bit-Angabe wie 
»BTST #3,D5‘‘ nur bis Bit 7 er¬ 
laubt ist. Größere Werte (8 bis 
31) müssen Sie vorab in ein Da¬ 
tenregister laden, also zum Bei¬ 
spiel für Bit 13 schreiben: 
move #13,d0 
btst d0,d5 

Die Bit-Befehle halten immer 
den vorherigen Zustand im Z- 
Flag fest, führen also zwei Ope¬ 
rationen aus. Diese Eigen¬ 
schaft, und ganz besonders die 
Fähigkeit von TAS sind ein gu¬ 
tes Beispiel für eine besondere 
Fähigkeit des 68000, nämlich 
die Unterstützung von Multi- 
Tasking. 

Mit dem TAS-Befehl wird Bit 7 
eines Byte-Operanden im Spei¬ 
cher abgefragt und das Ergeb¬ 
nis wie üblich im Z-Flag notiert. 
Dann wird eine 1 in Bit 7 ge¬ 
schrieben. Die ganze Folge, al¬ 
so Lesen des Operanden, Ab¬ 
frage und Zurückschreiben ist 
unteiibar, sprich kann nicht 
durch einen Interrupt unterbro¬ 
chen werden. Solche unteilba¬ 
ren Befehle sind in einem Mul- 
ti-Tasking-System sehr wichtig. 
Hier wären zum Beispiel Aufga¬ 
ben wie Prozeßumschaltung, 
Synchronisation von Prozes¬ 
sen und ähnliche zu nennen. 

Schiebe- und Rotierbefehle 
sind auch typisch für Assem¬ 
blerprogramme. Einige hatten 
wir schon kennengelernt, Ta¬ 
belle 9 zeigt den Gesamtüber¬ 
blick: 

Anzumerken ist auch hier, 
daß wie bei den Bit-Befehlen di¬ 
rekt nur #0 bis #7 erlaubt 
sind, und dann wieder ein Da¬ 
tenregister dazugenommen 
werden muß. 

Neben den Transfer-Befeh¬ 
len werden Sie die Programm¬ 
steuer-Befehle am häufigsten 
verwenden. Tabelle 10 zeigt, 
welche Möglichkeiten der 
68000 bietet. 

Zu beachten ist hier der Un¬ 
terschied zwischen den Ver- 
zweigungs- und den Sprungbe¬ 
fehlen. Erstere sind immer rela¬ 
tiv zum aktuellen PC, allerdings 
auf einen Adreßbereich von 
± 32 KByte begrenzt. 

Die Sprungbefehle JMP und 
JSR reichen über den vollen 
Adreßbereich von 16 MByte. 

CHK testet ein Datenregister 
gegen zwei Grenzen, nämlich 0 
und eine im Operanden ange¬ 
gebene Grenze. Spricht der 
Test an, wird eine Exception 
ausgelöst. Damit läßt sich sehr 
einfach eine Bereichsprüfung, 
zum Beispiel von Array-Indizes, 
realisieren. 

Große Teile der Amiga-Doku- 
mentation sind in C geschrie¬ 
ben, auch Intuition. Grund ge- 



Befehl 

Bedeutung 

BCHG 

Ändere (kippe) ein Bit 

BCLR 

Lösche ein Bit 

BSET 

Setze ein Bit 

BTST 

Prüfe ein Bit 

TAS 

Teste und setze Bit 7 eines Byte-Operanden 


Tabelle 8. Das »Bit-Schieben« wird kräftig unterstützt 



Befehl 

Bedeutung 

AND 

Logisch UND 

ANDI 

Logisch UND mit einer Konstanten 

EOR 

Logisch XOR 

EORI 

Logisch XOR mit einer Konstanten 

NOT 

Logisch NICHT (Einerkomplement) 

OR 

Logisch ODER 

ORI 

Logisch ODER mit einer Konstanten 


Tabelle 7. Die logischen Befehle In der 68000er-Syntax 
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nug, sich um die Übersetzung 
in Assembler zu kümmern: 

Ein »#include<« ersetzen Sie 
durch »include«, beim File-Na- 
men ändern Sie die Extension 
von h in i. Für 

# define Name Wert 

schreiben Sie 

Name equ Wert 

Die Namen der Funktionen 
stimmen überein, nur daß wir 
immer _LVO davorsetzen 


struct Name [ 

INT anton; 

LONG berta; 

] 

können Sie das umsetzen in: 
anton ds.w 1 
berta ds.l 1 

Die Amiga-Strukturen (wie 
Window oder Screen) werden 
Sie schon anhand der Namen 
wiedererkennen. Manchmal 
finden Sie auch nur deren Na¬ 


Schiebe- und Rotierbefehle 

Befeh 

Bedeutung 

ASL 

Arithmetische Verschiebung nach links 

ASR 

Arithmetische Verschiebung nach rechts 

LSL 

Logische Verschiebung nach links 

LSR 

Logische Verschiebung nach rechts 

ROL 

Rotieren links herum 

ROR 

Rotieren rechts herum 

ROXL 

Rotieren mit X-Bit links 

ROXR 

Rotieren mit X-Bits rechts 


Tabelle 9. Mit diesen Befehlen kommt der 68000 ins Rotieren 


müssen. Nehmen wir aller¬ 
dings die Makros, kommen wir 
C noch näher, denn zum Bei¬ 
spiel; 

move.l_IntuitionBase,a6 
jsr _LV00penWindow(a6) 
heißt mittels Makro nur 
CALLINT OpenWindow 

Die Datentypen in C machen 
viei Lärm um wenig, Tabelle 11 
zeigt Typen im Vergleich; 

Die groß geschriebenen Ty¬ 
pen sind übrigens keine echten 
C-Typen, sondern nur Makros. 
Finden Sie in C eine Struct- 
Konstruktion der Form 


men mit dem Präfix »extern«. 
Das ist dann eine Anweisung 
an den Linker, diese Struktur 
einzubinden. In diesem Fall 
schauen Sie in den Include- 
Files des Devpac nach, wo alle 
Strukturen definiert sind. 

Manchmal sind die Namen 
mit einem Präfix versehen, um 
Namenskonflikte zu vermeiden 
(In C dürfen Strukturen und Va¬ 
riablen denselben Namen ha¬ 
ben, in Assembler nicht). 

Das in C beim Aufruf übliche 
If OpenWindow 
(&windowptr)==0 
exit(false) 


Befehle zur Programmsteuerung 

Befehl 

Bedeutung 

Bcc 

Verzweige bedingt 

BRA 

Verzweige immer 

BSR 

Verzweige zu einem Unterprogramm 

CHK 

Checke Datenregister gegen Grenze 0 und andere 

DBcc 

Bedingte Schleife 

JMP 

Sprung zu einer Adresse 

JSR 

Sprung zu einem Unterprogramm 

NOP 

Keine Operation 

RESET 

Rücksetzen der Peripherie 

RTE 

Rückkehr von einer Exception 

RTR 

Rückkehr mit Laden der Flags 

RTS 

Rückkehr aus einem Unterprogramm 

Scc 

Setze 1 Byte bedingt 

STOP 

Halte Programm an 

TRAP 

Gehe in Exception 

TRAPV 

Gehe in Exception, wenn V-Flag gesetzt 


Tabelle 10. Alle Befehle zur Programmsteuerung 



C-TVp 

Assembler-TVp 

int 

•W 

long int 

• L 

unsigned int 

•W 

char 

.B 

BYTE 

.B 

UBYTE 

.B 

WORD 

.W 

UWORD 

.w 

LONG 

.L 

ULONG 

.L 


Tabelle 11. Diese Datentypen 
In C entsprechen denen in 
Assembler 


ersetzen Sie durch 

tst.l dO 

beq exlt 


jdort Close Libs und so 
und rts 

Ein Ausdruck wie »window 
prt-—wd_RPort« kostet uns in 
Assembler die Zeilen 

move.1 windowptr,al 
move.1 wd_RPort(al),al 

Damit wären wir am Ende un¬ 
seres Kurses und Sie am An¬ 
fang Ihrer (hoffentlich steilen) 
Karriere als Assembler-Pro¬ 
grammierer angekommen. 
Wenn Sie tiefer einsteigen wol¬ 
len, sehen Sie sich die Litera¬ 
turvorschläge unter der Rubrik 
»Bücher« in diesem Heft an (ab 
Seite ^47). 

Wir wünschen Ihnen viel Er¬ 
folg mit der maschinennahen 
Programmierung. 

(Peter Wollschlaeger/rs) 



DIE ABENXEU 
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WORKSHOP 

Fensterln 

mit PoweiWindows 


Beeindruckende Fenster, Menüs und Gad- 
gets geben Amiga-Programmen den not¬ 
wendigen Pfiff. Die Programmierung mit 
»Intuition« erfordert viel Geduld und führt 
häufig zu Abstürzen. »PowerWindows« 
bietet eine bequeme und sichere Hilfe, die¬ 
se Hindernisse zu überwinden. Mit diesem 
Vorgang verwenden Sie die Steighilfe zum 
Fensterln sinnvoll und effektiv. 


W as fällt einem Amiga- 
Programmierer zum 
Thema »Intuition« 
ein? Strukturen, Strukturen, 
Strukturen. Bevor er von der 
komfortablen Amiga-Benutzer- 
oberfläche profitieren kann, 
muß der Programmierer erst 
einmal eine Unmenge von In¬ 
tuition-Datenstrukturen mit den 
richtigen Werten versehen - ei¬ 
ne fehlerträchtige und zeitrau¬ 
bende Angelegenheit. Doch 
mit »PowerWindows« wird alles 
anders: Definieren Sie Ihre 
Windows, Screens, Menüs, 
Gadgets und Requester mit der 
Maus und lassen Sie den Ami- 
ga die Schreibarbeit erledigen - 
wozu hat man schließlich den 
Computer? 

PowerWindows ist schon seit 
einiger Zeit auf dem Markt. Seit 
der Version 2.5 arbeitet es mit 
den meisten verbreiteten Pro¬ 
grammiersprachen zusam¬ 
men. Leider steht die Anleitung 
dieses fantastischen Pro¬ 
gramms in keinem Verhältnis 
zu seiner Leistungsfähigkeit - 
sie ist mit mageren elf Seiten 
nur für Amiga-Profis verständ¬ 
lich. Doch PowerWindows kann 
gerade Anfängern eine Menge 
Arbeit abnehmen. Wir zeigen, 
wie Sie - egal ob Anfänger, Fort¬ 
geschrittener oder Profi - sich 
auf Ihr eigentliches Programm 
konzentrieren können und sich 
nicht mit den Strukturdefinitio¬ 
nen herumschlagen müssen. 

Sie denken - 
der Amiga 
schreibt 

Was ist dieses PowerWin¬ 
dows eigentlich? PowerWin¬ 
dows ist ein Programm, bei 
dem Windows, Screens, Me¬ 
nüs, Gadgets und Requester 
komfortabel mit Hilfe der Maus 
auf dem Bildschirm definiert 
werden. Die verschiedenen In¬ 
tuition-Flags (dazu lesen Sie 
später mehr) werden einfach 
per Mausklick eingestellt. Me¬ 
nüs und Untermenüs werden 
von PowerWindows komforta¬ 
bel verwaltet. Man kann dazu 
Menüpunkte einfach eingeben, 
ohne sich um irgendwelche 
Bildschirmkoordinaten küm¬ 
mern zu müssen. Auch alle For¬ 
men von Gadgets werden ein¬ 
fach mit der Maus auf den Bild¬ 
schirm gebracht, Menüs und 


Gadgets sind auf Wunsch mit 
selbst gezeichneten Grafiken 
zu veredeln. Obwohl das Pro¬ 
gramm sehr einfach zu bedie-, 
nen ist, lassen sich (fast) alte 
Fähigkeiten von Intuition an¬ 
wenden. 

Hat man seine Definitionen 
mit der Maus beendet, ist Po¬ 
werWindows dran: Es schreibt 
nun sämtliche benötigten Intui¬ 
tion-Datenstrukturen in Aztec 
C, Lattice C oder Assembler in 
eine Datei. Diese Datenstruktu- 
ren werden später einfach mit 
»#include« in eigene Program¬ 
me eingebaut. 

Der große Vorteil bei der Ar¬ 
beit mit PowerWindows ist, daß 
man Ergebnisse und Änderun¬ 
gen direkt auf dem Bildschirm 
sieht, Fehler sofort erkennt. 
Selbst definierte Menüs lassen 
sich beispielsweise ganz nor¬ 
mal als Amiga-Menüs an- 
klicken und ausprobieren. So¬ 
mit wird die Zeit für die Entwick¬ 
lung von Amiga-Programmen 
erheblich verringert - und man 
kann sich endlich auf das We¬ 
sentliche konzentrieren. 

Um bei unserem Workshop 
mitzumachen, sollten Sie zu¬ 
mindest etwas Programmierer¬ 
fahrung in C oder Assembler 
mitbringen. Alle Beispielpro¬ 
gramme sind in C verfaßt; ein 
Assembler-Programmierer mit 
etwas Erfahrung sollte keine 
großen Schwierigkeiten haben, 
sie umzusetzen. Obwohl die 
Beispielprogramme kommen¬ 
tiert sind, können wir für C- 
Anfänger nicht alles genau er¬ 
klären. In diesem Heft befindet 
sich auf Seite 24 ein C-Kurs, der 
Ihnen die Grundbegriffe der 
Betriebssystem-Programmie¬ 
rung in C vermittelt. 

Bevor Sie loslegen, benöti¬ 
gen Sie natürlich das Pro¬ 
gramm PowerWindows. Dieser 
Kurs basiert auf der Version 2.0. 


Die soeben erschienene Ver¬ 
sion 2.5 unterstützt wesentlich 
mehr Programmiersprachen 
als die Version 2.0 und arbeitet 
mit der PAL-Auflösung des Ami¬ 
ga. Außerdem wurden einige 
kleine Fehler beseitigt. Wenn 
Sie die Version 2.0 besitzen, 
sollten Sie sich möglichst bald 
die Version 2.5 besorgen. Der 
Hersteller (Inovatronics) bietet 
einen Update-Service gegen 
geringe Gebühr und Einsen¬ 
dung des Originals. 

Wenn Sie in C programmie¬ 
ren, benötigen Sie einen C- 
Compiler; wir haben »Aztec C« 
verwendet. Die Beispielpro¬ 
gramme dürften aber auch mit 
Lattice C keine Schwierigkeiten 
bereiten. Assembler-Program¬ 
mierer brauchen einen Assem¬ 
bler, der Include-Dateien verar¬ 
beiten kann, beispielsweise 
»Devpac«, »Profimat« oder 
»CAPE«: daneben ist der 
»A68k«-Assembler von der 
Fish-Disk 110 eine interessante 
Alternative für alle, die wenig 
Geld investieren wollen. Der 
weitverbreitete »Seka«-Assem- 
bler ist leider für PowerWin¬ 


dows ungeeignet, da er die 
Amiga-Standard-Include-Da- 
teien nicht verarbeiten kann. Al¬ 
le Beispielprogramme in die¬ 
sem Kurs sind in C geschrie¬ 
ben. Das erste Programm ist 
auch in Assembler abgedruckt, 
damit man sieht, wie Power- 
Windows-Dateien in Assembler 
verarbeitet werden. 

Natürlich können Sie sich 
PowerWindows auch auf ir¬ 
gendwelchen dunklen Kanälen 
besorgen. Aber wenn Sie inten¬ 
siv mit diesem Programm arbei¬ 
ten, sollten Sie auch die Vorteile 
nutzen, die Ihnen durch den 
rechtmäßigen Erwerb entste¬ 
hen: Dazu gehört das Hand¬ 
buch mit der Übersicht über al¬ 
le PowerWindows-Funktionen, 
der Update-Service sowie der 
Support (beispielsweise über 
die Inovatronics-Mailbox). 

Die dunklen 
Kanäle 

Daneben hat der Autor die¬ 
ses genialen Programms Bes¬ 
seres verdient als eine weite 
Verbreitung auf dem schwar¬ 
zen Markt. Oder was glauben 
Sie, würden Sie im Supermarkt 
zu hören bekommen, wenn Sie 
sich zum Nulltarif bedienen? 

PowerWindows erhalten Sie 
unter anderem bei Philgerma 
(Barerstr. 32, 8000 München, 
Tel. 089/281228) für zirka 150 
Mark. 

Bevor Sie mit dem Workshop 
beginnen, sollten Sie eine for¬ 
matierte Diskette bereitlegen, 
auf der Sie Ihre Programme 
speichern werden. Spieren 


Workshop - Was ist das? 


In diesem AMIGA-Sonderheft finden Sie erstmals die Rubrik 
»Workshop«. Diese werden Sie auch in kommenden Heften immer 
wieder entdecken. 

Wir werden unter dieser Rubrik Artikel veröffentlichen, die ähnlich 
wie ein Kurs intensiv bestimmte Themen behandeln. Die Workshops 
sollen allen Amiga-Programmierern und -Anwendern die Arbeit mit ei¬ 
nem Programm oder einem Paket von mehreren Programmen er¬ 
leichtern. 

Was halten Sie von dieser Idee? Welche Vorschläge haben Sie für 
kommende Workshop-Themen? Wir freuen uns auf Ihre Vorschläge 
und Meinungen. Schreiben Sie an: 

Markt & Technik Verlag AG 
Redaktion Sonderhefte 
Stichwort: Workshop 
Hans-Pinsel-Straße 2 
8013 Haar b. München 


AMIGA-SONDERHEFT 4 


101 






Bild 2. Sämtliche Window-Eigenschaften auf einen Blick 


Sie am besten PowerWindows 
auf diese Diskette - es hat kei¬ 
nen Kopierschutz. Wenn Sie 
mehr als 512 KByte Speicher 
haben, sollten Sie PoweiWin- 
dows und Ihren Compiler bezie¬ 
hungsweise Assembler gleich¬ 
zeitig im Speicher halten, weil 
das Arbeiten so am angenehm¬ 
sten ist. Natürlich können Sie 
bei diesem Workshop auch oh¬ 
ne Speichererweiterung mit¬ 
machen, nur müssen Sie dann 
PowerWindows immer wieder 
neu laden. 

Und nun: an die Arbeit! Öff¬ 
nen Sie Ihr erstes Fenster mit 
PowerWindows. Dazu laden 
Sie das Programm durch einen 
Klick auf sein Icon oder durch 


Eingabe von »PW2« im CLI. 
Sollten Sie bereits ein Fenster 
über den ganzen Bildschirm 
gezogen haben (beispielsweise 
das CLI), so werden Sie einen 
verblüffenden Effekt bemerken 
- nämlich keinen. Dies liegt dar¬ 
an, daß PowerWindows als so¬ 
genanntes -Backdrop-Window 
definiert ist, das Immer hinter 
allen anderen Fenstern liegt 
und auch nicht per Gadget her¬ 
vorzuholen ist. Drücken Sie ein¬ 
fach die rechte Maustaste, und 
Sie sehen die Menüleiste. Na¬ 
türlich können Sie auch alle 
Fenster schließen, die Ihnen im 
Weg sind. Wenn Ihnen diese 
Einstellung nicht gefällt, kön¬ 
nen Sie sie auch ändern: Ge¬ 


hen Sie dazu im PowerWin- 
dows-Menü »Preferences« auf 
»PW Backdrop« und lassen Sie 
die rechte Maustaste los. Dar¬ 
auf kommt das PowerWindows- 
Fenster nach vorne. Wenn Sie 
diese Einstellung speichern 
wollen, finden Sie im »Project«- 
Menü den Unterpunkt »Save 
Configuration«. 

In jedem Fall sollten Sie jetzt 
auf Ihrem Bildschirm ein Fen¬ 
ster geöffnet haben, das folgen¬ 
den Text In der Titelleiste an¬ 
zeigt: »PowerWindows v2.0 
(c)1987 by INOVATRONICS, 
INC«. Natürlich kann die Ver¬ 
sionsnummer durchaus eine 
andere sein. Drücken Sie jetzt 
die rechte Maustaste und se¬ 


hen Sie sich die Menüleiste an. 
Neben den schon bekannten 
Menüpunkten »Project« und 
»Preferences« finden Sie vier 
weitere: »Screen«, »Current 
Window«, »Menus« und »Gad- 
gets«. Um ein eigenes Fenster 
zu öffnen, wählen Sie im Menü 
»Current Window« den Punkt 
»Open a new Window«. Sofort 
sehen Sie ein kleines Fenster 
mit dem Titel »Your new Win¬ 
dow« auf dem Schirm. Sie kön¬ 
nen es mit der Maus beliebig 
verschieben und in der Größe 
verändern. Zum Ausprobieren 
werden Sie es nun gleich in ei¬ 
nem eigenen Programm einset- 
zen. PowerWindows ist dabei 
zuständig für die Datenstruktu- 
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^DRKSHOP 


1 PeO #include <intuition/intultion.h> 

2 J7 #inolude <intultion/intuitionbase.h> 

3 dH #include <functlons.h> 

4 nk #include 'ulndow^l.src' 

5 Y1 struot IntultionBase »IntultionBase; 

6 QQ main (} 

7 3W ( 

8 bZ2 struct Window »MyUindouj /» Zeiger auf Window-Struktur 1* 

/ 

9 QA if (1(IntultionBase = (struot IntultionBase *) 

10 Zy8 OpenLlbrary ('Intuition.llbrary',OL})) 

11 3E5 (printf {'Intuition ist nicht da! Was ist los?\n')i exi 

t {0);J 

12 oK /* Intuition-Library öffnen */ 

13 532 MyWindow = (struot Window ») OpenWindow (SNewWlndowStructu 

rel)i 

14 r55 /• Fenster öffnen -> MyWindow zeigt auf die Wlndow- 

15 HI8 Struktur. Wenn es gleich 0 ist, trat ein Fehler auf! 

»/ 

16 5K2 If (MyWindow =* 0} [printf ('Fenster ließ sich nicht öffne 

n!'); 

17 Y7M CloseLlbrary(IntultionBase); 

18 35 exit (0);j 

19 OUO Walt (IL <<MyWindow->U8erPort->inp_SlgBlt); 

20 13 /* Delay (150);*/ /* Amiga-Systemroutine: drei Sekunden war 

ten »/ 

21 aJ2 CloaeWindow (MyWindow); /• und das Fenster wieder zumach 

en */ 

22 KK CloseLibrary (IntultionBase); /» Library schließen »/ 

23 NsO j 

(C) 1988 M&T 

Listing 1a. Dieses Steuerprogramm öffnet ein Fenster 
und schließt es nach etwa drei Sekunden 


ren, Sie müssen lediglich für 
die Steuerung sorgen. Lassen 
Sie sich also den SourceCode 
für Ihr Programm auf Diskette 
schreiben. Zu diesem Zweck 
wählen Sie im Project-Menü 
den Punkt »Generate Source 
Code«. Klicken Sie im darauf er¬ 
scheinenden »Steuerpult« (Bild 
1) mit der Maus auf den Namen 
Ihres C-Compilers beziehungs¬ 
weise auf Assembler und dann 
auf das Wort »Output«. Power- 
Windows zeigt nun einen File- 
Requester, in dem Sie als Datei¬ 
name »window_1.src« einge¬ 
ben. Nach einem Klick auf 
»OK« wird der Window-Source¬ 
code auf Diskette geschrieben. 
In Bild 1 ist kurz erläutert, was 
»Generate Sourcecode« an 
Funktionen bietet. Die genaue 
Wirkung entnehmen Sie bitte 
dem Handbuch. 

Sollten Sie nur 512 KByte 
Speicher haben, speichern Sie 
das Ergebnis Ihrer Arbeit auch 
als PowerWindows-Datei unter 
dem Namen »window.pw«. Ver¬ 
wenden Sie dazu den Menü¬ 
punkt »Save screen and/or Win¬ 
dows« (im »Project«-Menü). Der 
File-Requester, der zu diesem 
Zweck erscheint, ist leicht zu 
bedienen. Verlassen Sie dann 
das Programm mit »Quit«. Um 
bei der nächsten Sitzung die 
gerade gespeicherte ».pw«-Da- 
tei wieder zu laden, verwenden 
Sie den Menüpunkt »Load 
screen and/or Windows«. Was 
steht in der Datei »window_1. 
src«? Betrachten Sie diese am 


besten eingehend mit einem 
Editor. Da nur ein Fenster geöff¬ 
net wurde, finden Sie auch nur 
eine Datenstruktur; »struct 
NewWindowNewWindowStruc- 
turel«. Was die einzelnen Punk¬ 
te der Struktur bedeuten, hat 
PowerWindows für Sie als Kom¬ 
mentar dazugeschrieben - um¬ 
ständliches Nachschlagen ist 
überflüssig! Auf die Strukturele¬ 
mente geht der C-Kurs ab Seite 
24 genauer ein. Wichtig für uns 
ist, daß die Window-Struktur 
den Namen »NewWindowStruc- 
turel« trägt - dieser wird später 
zum Öffnen des Fensters ge¬ 
braucht. Wenn Sie sich die 
Assembler-Datei ansehen, wer¬ 
den Sie feststellen, daß Power- 
Windows unter dem Label 
»NewWindowStructuret« eine 
Reihe von Daten abgelegt hat, 
die das Fenster definieren. Sie 
sind ebenfalls kommentiert. 


Kommentierter 

Sourcecode 

Um das Fenster in einem ei¬ 
genen Programm anzuwen¬ 
den, tippen Sie bitte entweder 
Listing 1a (für C-Programmie- 
rer) oder Listing 1b (für Assem¬ 
bler-Programmierer) ab. Beide 
Listings enthalten die Anwei¬ 
sung »include "windowerc"«, 
um unsere Window-Struktur 
einzubauen. Beim Assembler¬ 
programm steht diese Struktur 


1 uJ3 

incdir 'rinolude/' 

2 JX 

include intuition/intuitlon.l 

3 ZI 

include intuition/intuition_lib.i 

4 4w 

include exec/exec_lib.i 

5 6W 

include graphlcs/graphics_llb.i 

6 VdO 

NULL EQU 0 ; wird für die PW-Deflnitlonen benötigt 

7 tx 

* Intuition Library oeffnen: 

8 Gd 

»- 

9 6v3 

lea lntnB]ne,al 

10 vH 

moveq #0,d0 

11 HC 

CALLEXEC OpenLlbrary 

12 n 

tat.! dO 

13 CB 

beq abbruch 

14 nY 

fliove.l dO,_IntuitionBase ;Basls-Zeiger sichern 

15 RJcO 

» Window oeffnen 

16 XU 

«- 

17 353 

lea NewWlndowStructurel,aO ;Beige auf Wlndow-St 


ruktur 

18 3h 

CALLINT OpenWindow ;oeffne Window 

19 sp 

tst.I dO «ging was schief? 

20 7d 

beq closeint ;wenn ja 

21 FQ 

move.l dO.windowptr ;Wlndow-Zelger sichern 

22 zNO 

* Eine Zeitlang warten 

23 Td 


24 SX3 

move.l #$ffffffff,dO ; Zwei verschachtelte Wart 


eschlelfen 

25 «ZO 

waltl: move.l #$f,dl 

26 YN 

wait: dbra dl,walt 

27 HH8 

dbra dO,waitl 

28 cZO 

* Fenster schliessen 

29 WG 

« _ 

30 e83 

move.l windowptr,aO ;“Window-Adresse' nach aO 

n qX 

CALLINT CloseWindow ;Fenster zu 

32 AMO 

* Libraries schliessen 

33 dn 


34 Pf 

closelnt 

35 oT3 

move.l _IntuitlonBase,al 

36 rf 

CALLEXEC CloseLibrary 

37 dtO 

abbruch 

38 XD3 

move.l #0,d0 ;oder normales Ende 

39 hl 

rts 

40 MVO 

Intname INTNAME jNane Intuition Llb (via Makro 

41 VI 

.IntultionBase ds.l 1 ;Speicher fuer Zeiger 

42 QI 

windowptr ds.l 1 

43 vw3 

Include uindow.src 


(0 1988 H&T 

Listing 1b. Dieselbe Aufgabe erledigt dieses Programm in 
Assembler 


allerdings ganz am Ende, da 
Sie Daten nicht mit Programm- 
Code mischen dürfen. Achten 
Sie darauf, daß »window_1 .src« 
auch wirklich im aktuellen Di¬ 
rectory liegt. Falls Sie im Power- 
Windows-File-Requester einen 
anderen Pfad angegeben ha¬ 
ben, kopieren Sie das File in Ihr 
Arbeitsdirectory. Das Beispiel¬ 
programm öffnet das Fenster 
für etwa drei Sekunden und 
schließt es dann wieder. 

Übersetzen Sie das Pro¬ 
gramm und - voilä! - das Fen¬ 
stersteht für einige Zeit auf dem 
Schirm. 

Zurück zu PowerWindows. 
Wer mehr als 512 KByte Spei¬ 
cher hat, braucht nur das 
PowerWindows-Fenster zu akti¬ 
vieren - alle anderen laden bitte 
das Programm wieder und ho¬ 
len mit dem Menüpunkt »Load 
screen and/or Windows« im Me¬ 
nü »Project« das Fenster wieder 
auf den Bildschirm. 

Bisher haben Sie nur ein 
ganz einfaches Fenster er¬ 


zeugt. Aber lassen Sie uns jetzt 
gemeinsam durchleuchten, 
was PowerWindows mit Fen¬ 
stern alles anstellen kann. Dazu 
wählen Sie im Menü »Current 
Window« den Punkt »Edit win- 
dow characteristics«. Der gan¬ 
ze Bildschirm wird von einem 
»Schaltpult« für unser Fenster 
ausgefüllt (Bild 2). Dieses Feld 
dient zur komfortablen Verän¬ 
derung aller Window-Eigen¬ 
schaften mit der Maus. In der 
linken Hälfte des Feldes befin¬ 
den sich die sogenannten 
»IDCMP-Flags« - sie entschei¬ 
den darüber, über welche Aktio¬ 
nen des Benutzers unser Pro¬ 
gramm informiert werden soll. 
Viele dieser Flags werden hier 
noch eine Rolle spielen. Rechts 
oben sehen Sie die »Window- 
Flags«. Sie bestimmen unter 
anderem das Aussehen Ihres 
Fensters. Als Voreinstellung 
sind »WINDOWSlZING«, »WIN- 
DOWDRAG«, »WINDOW- 
DEPTH« und »SMART_RE- 
FRESH« eingeschaltet. Das 
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Fenster kann also in der Größe 
verändert, verschoben und 
nach hinten gekiickt werden; 
außerdem sorgt Intuition selb¬ 
ständig für das Zwischenspei¬ 
chern des Inhalts, falls es von 
einem anderen Fenster über¬ 
deckt werden sollte. Wenn Sie 
über die einzelnen Flags aus¬ 
führliche Informationen wün¬ 
schen, finden Sie diese im C- 
Kurs auf Seite 24 oder in einem 
Buch zu diesem Thema (siehe 
auch Seite 147). 

Links unten sehen Sie den Ti¬ 
tel des Fensters, den Sie natür¬ 
lich ändern können, nachdem 
Sie ihn angeklickt haben. »ID« 
und »TYPE« sind im Moment 
nicht wichtig. Unten in der Mitte 
befinden sich die Größenwerte 
für das Fenster, die in »WIEJTH« 
und »HEIGHT« (Breite und Hö¬ 
he) aufgeteilt sind. Unter »CUR¬ 
RENT« steht der momentane 
Wert, »MINIMUM« enthält die 
kleinstmögliche, »MAXIMUM« 
die größtmögliche Fenstergrö¬ 
ße. Bei »ORIGIN« sind die Itoor- 
dinaten der linken oberen Ecke 
des Fensters zu finden. Alle 
Zahlen werden durch Anklicken 
und Eintippen des neuen Wer¬ 
tes geändert ♦ oder natürlich 
durch Verschieben des Fen¬ 
sters. 

Als nächstes soll ein Fenster 
auf den Bildschirm gebracht 
werden, das sich durch einen 
Klick auf das Close-Gadget (in 
der linken oberen Ecke) von 
selbst wieder schließt. Außer¬ 
dem soll es den Titel »Amiga 
Sonderheft« bekommen. Tra¬ 
gen Sie also den Titel in das 
»TITLE«-Feld ein und klicken 
Sie rechts »WINDOWCLOSE« 
und links »CLOSEWINDOW«. 


»WINDOWCLOSE« sagt dem 
Amiga, daß das Fenster ein 
Schließ-Gadget haben soll; 
»CLOSEWINDOW« dagegen 
teilt unserem Programm mit, 
wenn dieses Gadget angeklickt 
wurde. Wenn Sie nun mit »OK« 
das Window-Steuerfeld verlas¬ 
sen, werden Sie feststelien, daß 
das Fenster ein Schließ-Gadget 
bekommen hat. Und auch der 
neue Titel steht in der Titelzeile 
des Fensters. Das Schließ-Gad¬ 
get hat während der Arbeit mit 
PowerWindows übrigens keine 
Funktion. 

Speichern Sie bitte wieder 
mit »Generate Sourcecode« 
den C- beziehungsweise As¬ 
sembler-Sourcecode ab. Das 
Programm muß nun ein wenig 
erweitert werden, damit es auf 
die Meldung von Intuition, daß 
das Schließ-Gadget betätigt 
wurde, auch reagieren kann. In¬ 
tuition versendet alle seine Mel¬ 
dungen als »Nachrichten« an 
das Programm (genauer ge¬ 
sagt an das Fenster), für das sie 
bestimmt sind. Das Programm 
braucht also ein »Postfach«, in 
dem diese Nachrichten abge¬ 
legt werden. Dieses Postfach 
hat den schönen Namen »Intui¬ 
tion Direct Communications 
Message Port«, abgekürzt 
»IDCMP«. Die vorher angespro¬ 
chenen IDCMP-Flags sind eine 
Art Filter, der nur noch die vor¬ 
her festgelegte Art von Nach¬ 
richten zum Postfach durchläßt. 
Im Moment ist nur das IDCMP- 
Flag »CLOSEWINDOW« ge¬ 
setzt - das Programm soll nur 
dann informiert werden, wenn 
das Schließ-Gadget angeklickt 
wurde. Alle anderen Nachrich¬ 
ten behält Intuition für sich, da 


sie für das Programm uninter¬ 
essant sind. 

Wie aber werden die Nach¬ 
richten von Intuition nun emp¬ 
fangen? Dazu gehen Sie in drei 
Schritten vor: 

- einen Speicherplatz für die 
Nachricht festlegen; 

- auf eine Nachricht warten; 
-auf die eingetroffene Nach¬ 
richt reagieren. 

Im C-Programm sieht das 
dann so aus, daß zuerst einmal 
mit 

struct Intui 
Message *insg 

ein Speicherplatz für die Nach¬ 
richt festgelegt wird. Dann war¬ 
tet man mit 

Wait (IL << MyUindow- 
> UserPort-> mp_SIgBit); 

auf die Nachricht. Die genaue 
Bedeutung dieser kompliziert 
wirkenden Anweisung ist un¬ 
wichtig. Es genügt zu wissen, 
daß auf eine Nachricht gewartet 
wird, die beim Fenster »MyWin- 
dow« ankommen soll. Während 
des Wartens hat der Amiga 
Zeit, sich anderen Dingen zu¬ 
zuwenden - er »weckt« das Pro¬ 
gramm erst, wenn eine Nach¬ 
richt angekommen ist. Nun wird 
das Fenster geschlossen und 
das Programm beendet. 

In Assembler funktioniert die 
Sache ähnlich: Mit 

move.l MyWlndow,aO 
move.l wd_UserPort(aO), 
aO 

move.l a0,a5 

move.b MP_SIGBIT(aO),dl 

moveq #0,d0 

bset dl,dO 

CALLEXEC Wait 


wartet das Programm ebenfalls, 
bis eine Nachricht eingetroffen 
ist. Um dies auszuprobieren, 
ersetzen Sie die »Detay«-Anwei- 
sung von Listing 1 durch 

Walt (IL << MyWindow- 
> UserPort-> mp_ 
SigBit)}; 

* Schon läßt sich das Fenster 
auf Wunsch wieder schließen. 

Der Fensterklau 
geht um 

PowerWindows bietet noch 
einige weitere Funktionen. 
Sehr interessant ist »Grab a 
Window«. Damit können Sie 
nach einem Fenster eines an¬ 
deren Programms »greifen« 
und es mitsamt allen Gadgets 
und Menüs in PowerWindows 
übernehmen. Nun wird es wie 
ein von PowerWindows erzeug¬ 
tes Fenster behandelt, man 
kann es also verändern und 
dann den Quellcode auf Disket¬ 
te schreiben lassen! 

Aber auch zum Erkennen 
von Window-Programmier¬ 
tricks ist »Grab a Window« sehr 
praktisch. Oder wußten Sie 
schon, daß alle Operationen 
der Workbench in einem soge¬ 
nannten »Backdrop-Border- 
less«-Window ablaufen (und 
keineswegs direkt auf dem 
Screen-Rastport, wie immer 
wieder zu lesen ist)? Wenn Sie 
»Grab a window« anwählen, 
wird von PowerWindows ein 
neues Menü mit den Menü¬ 
namen »Screens« und »Other« 
aktiviert. Bei »Screens« sehen 
Sie die Namen aller aktiven 
Screens als Menüpunkte; die 


Arbeit 

im Workbenctiscreen' 

Arbeit in 
eigenem Screen 


Flags werden 
von PW 
nicht verarbeitet 


Screen-Name 


SCREEN TYPE 


HPENCHSCREEN 


SCREEN DIHENSIONS 


Größe des Screens in Pixei 


326 X 206 


CIISIONSCKEEN 


320 X 466 


SCREEN FLAGS 


CUTOtttITHAP 


646 X 460 


Ipual plavtielp 




SPRITES 


PEN NUMBERS NUMBER OF 
mm BLOCH BITPLANES 

□□ IXI 

Standardzeichen¬ 
farben für den Screen 



SCREEN TITLE 


TEXt FONT 


SCREEM GAKETLIST POINTER 


ISEFAOLT FONT 


CUSTOHBITHAP POINTER 


T 


Zeiger auf Screen-Gadgets. 
Von PW nicht verwendet 


T 


Zeiger auf eigene Bitmap. 
Von PW nicht verwendet 


Anzahl der Screen- 
Bitplanes. Bestimmt die Anzahi 
der verfügbaren Farben 


Standardzeichensatz 
des Screens 


Bild 3. Customscreens können in der Version 2.0 nur bis zur (amerikanischen) NTSC-Auflösung erzeugt werden 
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Das Preferences-Menü 


OK prompts läßt Sie die »OK«-Requester bei den Gadget-und Text¬ 
funktionen abschalten. Mit < HELP > läßt sich ein solcher Requester 
auch bei abgeschalteten »OK prompts« auf den Bildschirm bringen. 

PowerWindows backdrop stellt ein, ob es sich beim PowerWin- 
dows-Fenster um ein Backdrop-Fenster handelt. Ein Backdrop-Fen- 
ster liegt hinter allen anderen Fenstern, was für manche Arbeiten 
ganz praktisch sein kann. 

Auto redraw hält PowerWindows davon ab, ein Window nach jeder 
Veränderung neu zu zeichnen. 

Auto select. Ist dieser Menüpunkt aktiv, wird bei jedem Mausklick 
außerhalb der Titelleiste eines eigenen Fensters das PowerWindows- 
Fenster aktiviert. 

Mouse Coordinates wählt, ob beispielsweise bei Gadget- 
Operationen die Mauszeiger-Position angezeigt werden soll. 

Gadget colllslon checking entscheidet, ob PowerWindows bei 
den Gadget-Befehlen auf sich überlappende Gadgets prüft oder 
nicht. 

Image color remapping tritt in Aktion, falls ein geladenes Image 
nicht dieselbe Farbpalette wie der aktive Screen hat. PowerWindows 
versucht dann, die Farben so gut wie möglich anzupassen. 

Wenn Image compression aktiv ist, werden alle Bitplanes von Gra¬ 
fiken, die nur Nullby^es enthalten, automatisch entfernt. 

Trim extra bitplanes reduziert jede Grafik auf die Zahl der Bitpla¬ 
nes, die der Screen hat, in dem sich die Grafik befindet. 

Source code comments schaltet die Kommentare im Quelltext ein 
und aus. 

Source code spacing hat ein Untermenü, in dem die Einrückung 
der Quelltextzeilen von PowerWindows eingestellt wird. Von einem 
bis acht Leerzeichen und einem Tabulator ist alles möglich. 


Titelzeilen aller Fenster auf je¬ 
dem Screen erscheinen als Un¬ 
termenüpunkte des jeweiligen 
Screens. Fenster ohne Titel tau¬ 
chen im Untermenü als Leer¬ 
zeile auf. Um ein bestimmtes 
Fenster zu »greifen«, wählen 
Sie es einfach aus dem Menü 
aus. Im Menü »Other« kommen 
Sie mit dem einzigen Menü¬ 
punkt »Return to main menu« 
wieder ins Hauptmenü zurück. 

Mit »Write window text« 
schreiben Sie beliebige Texte in 
Ihr Fenster. In der Abfragebox 
tippt man den gewünschten 
Text einfach ein. Klicken Sie mit 
der Maus auf Ihr Fenster, um 
den Text darin zu positionieren. 
Bewegen Sie ihn an die ge¬ 
wünschte Stelle und befestigen 
Sie ihn per Mausklick. Geben 
Sie so viele Textzeilen ein, wie 
Sie wollen. Beim Positionieren 
eines Textes schaltet Power¬ 
Windows übrigens alle anderen 
Texte aus - sie erscheinen wie¬ 
der, sobald Sie den Text durch 
einen Mausklick »befestigt« ha¬ 
ben. Mit »Edit Window Text« ver¬ 
ändern Sie Ihre Texte: Alle bis¬ 
her eingegebenen Textzeilen 
stehen in einem Untermenü, 
aus dem man auswählt. »Move 
window text« dient zum Ver¬ 
schieben von Textzeilen, und 
mit »Delete window text« ver¬ 
schwindet die angewählte Zeile 
wieder. Um die Texte auch mit 
dem Programm anzuzeigen, 
bauen Sie eine kleine Ände¬ 
rung ein: Setzen Sie bitte die 
Zeile 

PrlntIText(MyWindow-> 
RPort,&ITextl,0,0) 
in das C-Programm nach Zeile 
15 ein. Nun werden alle vorher 
definierten Texte angezeigt. 

Eigene Screens 
in aiien Größen 

Die letzte Funktion im »Cur¬ 
rent Window«-Menü ist »Kill 
window«, mit der Sie nach einer 
Sicherheitsabfrage das Win¬ 
dow wieder löschen können. 

Übrigens: Sie können natür¬ 
lich auch mit mehreren Fen¬ 
stern gleichzeitig in PowerWin¬ 
dows arbeiten, wenn Sie den 
Menüpunkt »Open new Win¬ 
dow« einfach mehrmals anwäh¬ 
len. Beachten Sie dabei, daß 
für PowerWindows das aktuelle 
Fenster immer dasjenige ist, 
das Sie als letztes definiert ha¬ 
ben. Sie sollten also immer die 
Arbeit mit einem Fenster abge¬ 
schlossen haben, bevor Sie 
das nächste definieren. »Edit 
window characteristics«, die 
Textfunktionen und »Kill win¬ 
dow« beziehen sich also immer 
auf das Fenster, das als letztes 
definiert wurde. 


PowerWindows unterstützt 
natürlich auch die Verwendung 
eigener Screens. Dazu wählen 
Sie im »Screen«-Menü »Define 
screen type«. Das Screen- 
Steuerfeld (Bild 3) erscheint auf 
dem Bildschirm. Unter 
»SCREEN TYPE« klicken Sie 
auf »CUSTOMSCREEN«. um 
einen eigenen Screen zu er¬ 
zeugen. Bei »SCREEN DIMEN- 
SIONS« geben Sie die Screen- 
Größe an. Die Version 2.0 von 
PowerWindows hat hier aller¬ 
dings ein Problem: Da die PAL- 
Auflösung des Amiga hier noch 
nicht unterstützt wird, kann 
man mit dieser Version auch 
keine PAL-Screens erzeugen. 
Bei der neuen Version 2.5 ist 
dieses Problem behoben - hier 
können Sie Ihre Screen-Größe 
vollkommen frei wählen. Im 
Screen-Steuerfeld gibt es noch 
einige andere Einstellungen; 
die Zahl der Bitplanes; die 
Standard-Zeichenfarben für 
den Screen; der Standardzei¬ 
chensatz; der Screen-Titel und 
einige Screen-Flags, die Power¬ 
Windows aber nicht anwendet, 
sondern lediglich in den Quell¬ 
text einbaut. 

Alle Fenster, die Sie nach der 
Screen-Definition öffnen, wer¬ 
den auf dem neuen Screen ge¬ 
öffnet. Alle »alten« Fenster wer¬ 
den automatisch dorthin ko¬ 
piert. Wenn Sie während der 
Anzeige des Screens die rechte 
Maustaste drücken, erhalten 
Sie das PowerWindows-Menü. 
Sie können auch mit <F1> 
und <F2> zwischen der Work- 
bench und Ihrem Screen hin- 


und herschalten. Um einen 
selbst erzeugten Screen wieder 
auszuschalten, klicken Sie im 
Screen-Steuerfeld wieder auf 
»WBENCHSCREEN«. Alle Fen¬ 
ster des Custom-Screens wer¬ 
den dann automatisch in den 
Workbenchscreen kopiert. 

Mit »Screen Palette« wird die 
Farbpalette für den Screen ver¬ 
ändert. »READ PALETTE 
FROMIFF« läßt Sie eine Palette 
von einem IFF-Bild einiesen. 
Für einen File-Requester zu 
diesem Zweck klicken Sie auf 
den Text »READ PALETTE 
FROMJFF«. 

Zur Übung erzeugen Sie am 
besten einen Screen mit der 
Größe 320 x 200. Öffnen Sie in 
ihm ein Fenster, bei dem 
CLOSEWINDOW und WIN- 
DOWCLOSE gesetzt sind, und 
speichern Sie den Quellcode 
als »Screen_l.src«. 

Wie bringen Sie so einen 
Screen auf den Bildschirm? 
Das Vorgehen unterscheidet 
sich nur wenig von Listing 1. Sie 
verwenden den Funktionsauf¬ 
ruf »QpenScreen (screen)«, der 
einen neuen Screen öffnet und 
als Wert die Adresse seiner 
Screen-Struktur zurückgibt, 
»screen« ist ein Zeiger auf die 
NewScreen-Struktur, bei 
PowerWindows hat sie den Na¬ 
men NewScreenStructurel. 
Damit haben Sie alle Informa¬ 
tionen, die Sie benötigen. Ver¬ 
suchen Sie, wenn alles ge¬ 
klappt hat, noch etwas mit dem 
eben Gelernten zu spielen. So 
könnten Sie beispielsweise die 
Farben oder die Flags verän¬ 


dern. Beachten Sie dabei im¬ 
mer, wie sich der von Power¬ 
Windows produzierte Source¬ 
code verändert. 

Im Programm wird der 
Screen geöffnet. Damit das 
Fenster auch »weiß«, in wel¬ 
chem Screen es erscheinen 
soll, wird nun der Screen- 
Zeiger in der »NevWVindow«- 
Struktur auf den gerade geöff¬ 
neten Screen gestellt. Das soll¬ 
ten Sie nicht vergessen, sonst 
kann das Fenster nicht geöffnet 
werden! Am Ende des Pro¬ 
gramms werden Fenster und 
Screen wieder geschlossen.. 

Menüs? 
Ganz einfach! 

Nachdem Sie nun bis hierher 
gelesen haben, werden Sie 
vielleicht denken: »Also Fenster 
und Screens kann ich auch oh¬ 
ne PowerWindows auf den Bild¬ 
schirm bringen!« Deshalb 
kommt nun etwas sehr viel 
Komplizierteres. Haben Sie 
schon einmal versucht, ein Pro¬ 
gramm mit einem Menü zu ver¬ 
sehen? Dann wissen Sie, daß 
das eine sehr aufwendige Sa¬ 
che ist, bei der man vor lauter 
»Menuitem«- und »IntuiText«- 
Strukturen leicht den Überblick 
verliert. Bei PowerWindows ha¬ 
ben Sie damit nichts zu tun! Als 
Beispiel soll ein Menü für einen 
einfachen Texteditor dienen. Es 
besteht aus zwei Menü-»Über- 
schriften«: »Projekt« und »Text«. 
Im Menü »Projekt« sollen die 
Menüpunkte »Text laden«, »Text 
speichern«, »Info« und »Ende« 
stehen. Das »Text«-Menü soll 
die Punkte »Ausschneiden«, 
»Kopieren«, »Einsetzen«, »Be¬ 
wegen« und »Löschen« bekom¬ 
men. 

Öffnen Sie also mit Power¬ 
Windows ein Fenster und set¬ 
zen Sie die Flags »CLOSEWIN¬ 
DOW« und »WINDOWCLOSE« 
sowie »MENUPICK«. Nun wäh¬ 
len Sie aus dem PowetWin- 
dows-Menü »Menu« den ersten 
Punkt, »Append a Menu« (ein 
Menü anhängen). Es erscheint 
eine Abfragebox, in der Sie das 
Wort »Projekt« eingeben und 
auf »OK« klicken. U m das Menü 
anzusehen, klicken Sie auf die 
Titelleiste oder auf das Close- 
Gadget Ihres Fensters. Nach 
dem Druck auf die rechte 
Maustaste sehen Sie das Menü 
»Projekt« mit dem einzigen 
Menüpunkt »dummy« auf dem 
Bildschirm. Nun bekommt das 
»Projekt«-Menü seine Menü- 
punMe. Dazu müssen Sie erst 
PowerWindows aktivieren (Mit 
einem Klick ins PowerWin- 
dows-Fenster). Das ist einer der 
großen Vorteile dieses Pro- 
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1 PeO #lnclude < Intuition/Intuition.h> 

2 J7 #lnclude <lntultlon/intultlonba8e.h> 

2 dH #lnclude <functlons.h> 

4 Km #lnclude 'Menu.src' 

5 Y1 atmet IntuitionBaae »IntultlonBase; 

6 QQ maln () 

7 3W • ( 

8 LK2 atmet Window «MyWlndow; 

9 sC atmet IntuiMessage «Mesaage; 

10 HS Int dass, code; * 

•11 SC if (! (IntuitionBaae = (atmet IntuitionBaae *) 

^ bOA OpenLibrary ('Intuition.library',OL))) 

13 5G5 (printf ('Intuition iat nicht dal Was ist los?\n'); exi 

t (0);j 

14 642 MyWindoW = (atmet Window ») OpenWindow (&NewWindowStructu 

rel); 

15 4J4 if (MyWindow == 0) {printf ('Fenster ließ sich nicht öff 

nenl'); 

16X60 Cl09eLibrary(IntuitionBa8e); 

17 24 exit {0);j 

18 7k2 SetMenuStrip {MyWlndow,&Menul)j /» Menü einschalten */ 

19 xT do ( /» Diese Schleife wird durchlaufen, bis eine CLOSEWI 

NDOW- 

20 ImB Nachricht kommt. */ 

21 inw3 Walt (IL << MyWlndow->U8erPort->mp_SigBit); /* Auf (i 

rgend)eine 

22 8zQ Nachricht warten */ 

23 Iq4 whlle (Message * GetHag (MyWindow->ü8erPort)) 

24 Kn5 { 

25 JY6 Claas « Message -> Claas; /* Class- und Code-Wert » 

/ 

26 cq Code * Message -> Code; /» apeichem » 

/ 

27 PI ReplyMsg (Message); /» Nachricht quittieren */ 

28 gx7 if (claaa *« CLOSEWINDOW) break; /* Fenster zu! »/ 

29 Ju if (class »« MEMUPICK) /» Menü angewählt! •/ 

30 8q9 printf ('Ausgewählt wurde Menü Ud mit dem Menüpunkt 

!td.\n', 

31 RCI MENUNUM (code), ITEMNUM (code)); 

32 NGR /* Angewählte Menüpunkte ausgeben 

•/ 

33 2c6 ) /* Ende der whlle-Schleife */ 

34 KE3 ) whlle (olasa !« CLOSEWINDOW); 

35 KQ2 CloseWlndow (MyWindow); 

36 dk CloseLlbrary (IntultlonBase); 

37 b60 ] 

(C) 1988 H&T 

Üstlng 2. Hier sehen Sie eine einfache Menüabfrage 


gramms: Sie können sich Ihr 
Menü sofort durch einen einfa¬ 
chen Mausklick ansehen und 
es verändern, falls Sie nicht da¬ 
mit zufrieden sind. 

Wählen Sie nun im »Menu«- 
Menü »Work on Menuitems 
for...«. Es erscheint ein Unter¬ 
menü, dessen einziger Eintrag 
Im Moment noch »Projekt« ist. 
Diesen Untermenüs werden 
Sie bei der Arbeit mit Power- 
Windows noch öfter begegnen: 
Sie machen die Auswahl des 
Menüs, das bearbeitet werden 
soll, sehr einfach. Hier wird in 
Zukunft als Abkürzung für 
»wählen Sie den Menüpunkt X 
mit dem Unterpunkt Y« einfach 
stehen »Wählen Sie den Punkt 
X/Y«.) Bewegen Sie also den 
Mauszeiger auf »Projekt« und 
lassen Sie ihn los. 

Bei einem Druck auf die rech¬ 
te Maustaste sehen Sie, daß ei¬ 
ne neue Menüleiste einge¬ 
schaltet ist, die »Menuitems« 
und »Other« enthält. Auch das 
Umschalten zwischen den ver¬ 
schiedenen Menüs werden Sie 
noch öfter beobachten. Ganz 
allgemein dient »Other« immer 
dazu, wieder in das Hauptme¬ 
nü (»Return to main menu«) 
oder in das vorherige Menü 
(»Return to previous Menu«) zu¬ 
rückzukehren - wir werden auf 
»Other« also nicht mehr aus¬ 
drücklich hinweisen. Wählen 
Sie aus dem ersten Menü »Ap- 
pend a menuitem« und tippen 
Sie in die große Abfragebox 
»Text laden« ein, ohne sich um 
den Rest der Box zu kümmern. 
Nach einem Klick auf »OK« ist 
»Text laden« der erste (und bis¬ 
her einzige) Menüpunkt von 
»Projekt« geworden, wie Sie 
durch einen Klick auf die Fen- 
ster-Titellelste leicht feststellen 
können. Klicken Sie wieder in 
das PowerWindows-Fenster 
und hängen Sie mit »Append 
Menuitem« die restlichen Me¬ 
nüpunkte (»Text speichern«, »In¬ 
fo« und »Ende««) an das Projekt- 
Menü an. 

Über das »Other«-Menü ge¬ 
langen Sie wieder in das Power- 
Windows-Hauptmenü. Nun er¬ 
zeugen Sie mit »Append Menu« 
das »Text«-Menü und geben wie 
bei »Projekt« besprochen die 
Menüpunkte »Ausschneiden«, 
»Kopieren«, »Einsetzen«, »Be¬ 
wegen« und »Löschen« ein. 
Wenn Sie sich Mausbewegun¬ 
gen sparen wollen, sollten Sie 
sich die Shortcuts neben den 
einzelnen Menüpunkten anse¬ 
hen. 

Sollten Sie sich bei einem 
Menüpunkt einmal vertippt ha¬ 
ben, stehen die PowerWin- 
dows-Menüpunkte »Edit a me¬ 
nu« und »Edit a menuitem« für 
Menüs und Menüpunkte zur 


Verfügung. Hier können Sie 
das fehlerhafte Menü oder den 
fehlerhaften Menüpunkt - wie 
üblich über ein Untermenü • 
auswählen und korrigieren. 
Wollen Sie beispielsweise an 
einem Menüpunkt von »Pro¬ 
jekt« arbeiten, müssen Sie na¬ 
türlich erst mit »Work on menu- 
items.. ./Projekt« in das Menu- 
item-Menü umschalten. 

Wie aber baut man nun das 
Menü in ein eigenes Programm 
ein? Ein Menü soll nicht einfach 
nur angezeigt werden, sondern 
das Programm muß auch da¬ 
von erfahren, wenn ein Menü¬ 
punkt ausgewählt wurde. Damit 
dies korrekt geschieht, müssen 
Sie unbedingt das Flag 
»MENUPICK« Im Fenster- 
Steuerfeld setzen. Es sagt Intui¬ 
tion, daß Ihr Programm »wissen 
will«, wenn ein Menü gewählt 
wurde. Erzeugen Sie dann bitte 
die Datenstrukturen unseres 
Menüs in Ihrer Lieblings-Pro¬ 
grammiersprache. Bevor Sie 
PowerWindows beenden, spei¬ 
chern Sie bitte mit »Save Win¬ 
dows and/or Screens« (ist Im 
»Project«-Menü von PowerWin¬ 
dows zu finden) die Ergebnisse 
Ihrer Arbeit, damit wir später mit 
demselben Menü Weiterarbei¬ 
ten können. 

Der Einbau 
ins Programm 

Um ein Menü anzuzeigen, 
genügt der Aufruf einer Intui¬ 
tion-Funktion: »SetMenuStrip 
(window,Menu)« zeigt im Fen¬ 
ster »window« das Menü »Me¬ 
nu« an. Mit »ClearMenuStrip 
(window)« kann man das Menü 
des Fensters Window wieder 
entfernen. 

Wie bereits bei den Fenstern 
besprochen, sendet Intuition al¬ 
le Informationen, die es einem 
Programm zukommen lassen 
möchte, an den »Intuition Direct 
Communications Message 
Port« des Fensters. Auf diese 
»Nachrichten« wird, wie Sie be¬ 
reits wissen, mit »Wait« gewar¬ 
tet. Bisher konnte das Pro¬ 
gramm nur eine Nachricht er¬ 
halten: »CLOSEWINDOW«, al¬ 
so die Information, daß das 
Schließ-Gadget des Fensters 
angeklickt wurde. Wird ein Me¬ 
nüpunkt ausgewählt, sendet 
uns Intuition ebenfalls eine 
Nachricht -• das Programm muß 
also zwischen »Menüpunkt ge¬ 
wählt« und »Schließ-Gadget ge¬ 
klickt« unterscheiden können. 

Eine Intuition-Nachricht ent¬ 
hält einige Daten, von denen 
nur zwei momentan wichtig 
sind: »Class« und »Code«. 
Class enthält die Art der Nach¬ 
richt, beispielsweise »CLOSE¬ 
WINDOW« (»Fenster zu«) oder 


»MENUPICK« (Menüauswahl 
hat stattgefunden). Code ent¬ 
hält bei einer Menüauswahl die 
(in 16 Bit verschlüsselte) Num¬ 
mer des ausgewählten Menüs, 
Menüpunkts und Unterpunkts. 
Um auf eine Intuition-Nachricht 
zu reagieren, muß das Pro¬ 
gramm wie bisher mit »Wait« 
auf die Nachricht warten. Mit 
der Funktion »GetMsg« muß die 
Nachricht nun »abgeholt« wer¬ 
den. Class und Code werden in 
eigene Variablen kopiert - dann 
wird die Nachricht mit »Reply 
Msg« quittiert. Dies ist unbe¬ 
dingt erforderlich und soll so 
schnell wie möglich nach 
GetMsg erfolgen! Da Class und 
Code aber nach ReplyMsg 
nicht mehr lesbar sind, muß 
man die beiden in eigene Varia¬ 
blen umkopieren und dann die 
Nachricht quittieren. 

Um eine Menüauswahl zu er¬ 
kennen, muß das Programm 
den (zwischengespeicherten) 
Class-Wert mit MENUPICK ver¬ 
gleichen. Ist der Vergleich er¬ 
folgreich, wurde ein Menüpunkt 


angewählt. Weicher, steht im 
Code-Feld der Nachricht - aller¬ 
dings bisher noch verschlüs¬ 
selt. Die Entschlüsselung geht 
folgendermaßen: 

Nujnmer_des_gewählten_ 
Menüs = MENUNUM (Code); 
Nunimer_des_Menüpunktes 
= ITEMNUM (Code); 
Nummer_des_Unterpunktes 
= SUBNUM (Code); 

Menüs, Menüpunkte und Un¬ 
terpunkte werden mit 0 begin¬ 
nend durchnumeriert. 

Wie man das alles in ein Pro¬ 
gramm einbaut, sehen Sie in Li- 
sting 2. Es wartet auf eine Me¬ 
nüauswahl und druckt die 
Nummer des Menüs und des 
Menüpunkts in das CLI-Fen- 
ster. Dabei wurde noch eine 
»while«-Schleife eingebaut, um 
auch wirklich alle Nachrichten 
von Intuition zu lesen. In Ihren 
Programmen sollte das genau¬ 
so sein. Im Moment wird SUB¬ 
NUM übrigens noch nicht be¬ 
nutzt, da ja noch kein Unterme¬ 
nü definiert wurde. 
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Bild 4. So einfach bauen Sie Ihre Menü-items zusammen 


Vielleicht haben Sie schon 
gemerkt, daß Intuition dem Pro¬ 
gramm auch dann eine Menü- 
Nachricht schickt, wenn die 
rechte Maustaste gedrückt und 
wieder losgelassen wurde, oh¬ 
ne daß man ein Menü gewählt 
hatte. Die Anzeige sieht dann 
so aus; 

Ausgewählt wurde Menü 
63 mit dem Menüpunkt 31- 

Dieser Fall muß natürlich ab¬ 
gefangen werden. Dazu gibt es 
die Intuition-tonstante »MENU¬ 
NULL«. Wenn Code gleich ME¬ 
NUNULL ist, wurde kein Menü¬ 
punkt ausgewählt. In Listing 2 
müssen Sie also in Zeile 30 
schreiben: 

if (code != MENUNULL) 
printf... 

Experimentieren Sie ruhig 
ein wenig mit dem Programm. 
Natürlich ist es nicht der Sinn 
eines Menüs, eine Anzeige wie 
»Der Menüpunkt X wurde aus- 
gewählt« auf den Bildschirm zu 
bringen, sondern man will ei¬ 
nen bestimmten Programmteil 
starten. Am einfachsten geht 
das mit einer »case«-Abfrage. 

Menüs 

entschlüsselt 

Aber zurück zu PowerWin- 
dows. Sie haben nämlich lange 
nicht alle Möglichkeiten ken¬ 
nengelernt, die das Programm 
für Menüs bietet. Oft ist es prak¬ 
tisch, wenn man statt dem Auf¬ 
ruf eines Menüpunktes mit der 
rechten Maustaste einfach die 
rechte Amiga-Taste zusammen 
mit einem bestimmten Buch¬ 
staben drücken kann. Einige 
dieser »Tasten-Abkürzungen« 
sollen auch in unser Menü ein¬ 


gebaut werden, und zwar für 
»Ausschneiden« ein X, für »Ko¬ 
pieren« ein C und für »Einset¬ 
zen« ein P. Dazu laden Sie bitte 
wieder PowerWindows und die 
abgespeicherte PowerWin- 
dows-Datei mit dem Menü. 
Wählen Sie nun »Work on me- 
nuitems for.../Text«. Nun brin¬ 
gen Sie mit »Edit Menuitem / 
Ausschneiden« das Menu-Item- 
Steuerfeld (Bild 4) auf den Bild¬ 
schirm. Rechts unten geben 
Sie den gewünschten »Com- 
mand Key«, also hier ein X, ein. 
Nun klicken Sie noch auf 
»Room for Altkey«, damit für die 
im Menü erscheinende Tasten¬ 
kombination auch Platz vorhan¬ 
den ist. Schon hat »Ausschnei¬ 
den« seine eigene Tastenkom¬ 
bination, wie Sie leicht selbst 
nachprüfen können. Wenn Sie 
nun das neue Menü in das Pro¬ 
gramm einbauen, werden Sie 
sehen, daß die Betätigung einer 
Tastenkombination für das Pro¬ 
gramm wie die Auswahl des 
entsprechenden Menüpunktes 
aussieht. Am Programm muß 
also nichts geändert werden. 

Das Menu-Item-Steuerfeld 
bietet noch eine Fülle von Funk¬ 
tionen. Einige von ihnen wer¬ 
den wir in diesem Kurs noch an¬ 
wenden; im Bild 4 sind sie kurz 
erklärt. 

Nehmen wir an, der Textedi¬ 
tor würde noch etwas erweitert. 
Er kann jetzt auch mit verschie¬ 
denen Druckerzeichensätzen 
arbeiten - und die sollen per 
Menü gesteuert werden. Die 
Zeichensätze heißen »Times 
Roman«, »Courier«, »Helvetica« 
und »Pica«. Damit der Benutzer 
des Programms immer weiß, 
welcher Zeichensatz aktiv ist, 
soll neben dem gewählten Zei¬ 
chensatz ein Häkchen stehen. 


Und natürlich kann man nicht 
mit zwei Zeichensätzen gleich¬ 
zeitig arbeiten! Kompliziert? 
Nicht mit PowerWindows. Wie 
Sie sicher wissen, kann Intui¬ 
tion automatisch ein kleines 
Häkchen vor einen Menüpunkt 
setzen, wenn dieser gerade ak¬ 
tiv ist. Man nennt solche Menü¬ 
punkte, die ein Häkchen haben 
können, »Attribute-Items«, weil 
sie eine Eigenschaft anzeigen. 
Alle Items ohne Häkchen hei¬ 
ßen »Aktions-Items«, weil sie ei¬ 
ne Aktion wie das Laden eines 
Textes austösen. 

Damit immer nur ein Zei¬ 
chensatz ein Häkchen be¬ 
kommt, benutzt Intuition das 
»Mutual Exclusion«-System. 
Auf deutsch heißt das »gegen¬ 
seitiger Ausschluß«. Es bedeu¬ 
tet, daß Sie für jeden Menü¬ 
punkt sagen können, bei wel¬ 
chen anderen das Häkchen ge¬ 
löscht werden soll, wenn man 
diesen Menüpunkt wählt. Da¬ 
mit ist das Problem schnell ge¬ 
löst: 

Erzeugen Sie zunächst ein¬ 
mal das neue Menü »Zeichen¬ 
satz«. Danach schalten Sie wie 
gehabt mit »Work on Subitems 
for... / Zeichensatz« auf die Be¬ 
arbeitung dieses Menüs um. 
Nun wird mit »Append menu- 
item« der erste Menüpunkt an¬ 
gehängt: »Times Roman«. Da¬ 
mit Intuition weiß, daß dieser 
Punkt beim späteren Aufruf ein 
Häkchen bekommen soll, akti¬ 
vieren Sie bitte »CHECKIT« 
(»gib ihm ein Häkchen«) und 
»ROOM FOR CHECK«. Letzte¬ 
res Flag sagt PowerWindows, 
daß es Platz für ein Häkchen re¬ 
servieren soll. Zusätzlich akti¬ 
vieren Sie bitte noch 
»CHECKED« (»es hat ein Häk¬ 
chen«), damit der erste Menü¬ 


punkt bereits beim Start des 
Programms mit einem Haken 
versehen ist. 

Bei den restlichen Menü¬ 
punkten (»Courier«, »Helvetica« 
und »Pica«) verfahren Sie ge¬ 
nauso. Schalten Sie aber ab 
Courier das CHECKED-Flag 
aus, sonst sind später alle Zei¬ 
chensätze aktiv! 

Völlig 

ausgeschlossen 

Wenn Sie das neue Menü 
ausprobieren, werden Sie fest¬ 
stellen, daß wir noch keinen 
»gegenseitigen Ausschluß« ein¬ 
gebaut haben - man kann näm¬ 
lich im Moment alle Zeichensät¬ 
ze gleichzeitig mit einem Häk¬ 
chen versehen. Aktivieren Sie 
also mit »Edit menuitem.../ 
Times Roman« noch einmal 
das Steuerfeld für den ersten 
Menüpunkt. Drücken Sie die 
rechte Maustaste - es erscheint 
ein Menü mit dem Namen »Mu¬ 
tual Exclusion«. Der einzige 
Menüpunkt »Pick items to ex- 
ciude« enthält als Unterpunkte 
die vier Zeichensätze. Geben 
Sie jedem außer »Times Ro¬ 
man« ein Häkchen. Das bedeu¬ 
tet, daß bei der Auswahl von »Ti¬ 
mes Roman« alle anderen Häk¬ 
chen automatisch ausgeschal¬ 
tet werden. 

Mit den anderen Menüpunk¬ 
ten verfährt man genauso - es 
werden bei jedem Punkt alle 
anderen ausgeschlossen. 
(Übrigens: Ein Punkt kann sich 
auch selber ausschließen, aber 
dann kann man ihn nie anwäh¬ 
len...) Nun funktioniert das 
Ganze, wie es soll - nur ein Zei¬ 
chensatz kann eingeschaltet 
sein. Wenn Sie wollen, probte- 
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1 PeO #include < intuition/intuitlon.h> 

2 J7 #include <intuitlon/intultionbase.h> 

3 dH #lnclude <functions.h> 

4 g4 #lnclude ^enu_l.src* 

5 Y1 struct IrtuitlonBase »IntuitlonBase; 

6 QQ maln () 

7 3W [ 

8 LK2 struct Window «HyWlndow; 

9 sC struct IntulMessage «Message; 

10 NS Int dass, Code; 

11 oy struct Menuitem «Item; 

12 TD if (!(IntuitlonBase = (struct IntultlonBase *) 

13 eAA OpenLibrary ('Intuition.llbrary',0))) 

14 6H5 {prlntf ('Intuition ist nicht da! Was ist los?\n'); exl 

t (0);! 

15 752 HyWlndow = (struct Window «) OpenWindow (SNewWlndowStructu 

rel); 

16 5K4 if (MyWindow «* 0) {printf ('Fenster ließ sich nicht öff 

nenl'); 

17 T70 CloseLibrary(Intuitlonßase); 

18 35 exlt (0);) 

19 812 SetHenuStrip (MyWindow,iHenul); /« Menü einschalten */ 

20 yU do { /« Diese Schleife wird durchlaufen, bis eine CLOSEWI 

NDOW- 

21 iJnB Nachricht kommt. */ 

22 nx3 Walt (IL << MyWlndow->UserPort->mp_SlgBit); /« Auf (i 

rgend)eine 

23 90C Nachricht warten */ 

24 Jr4 while (Message = GetMsg (MyWindow->UserPort)) 

25 Lo5 ! 

26 kZ6 dass - Message -> Class; /* dass- und Code-Wert « 

/ 

27 dr Code = Message -> Code; /* speichern » 

/ 

28 Qm ReplyMsg (Message); /» Nachricht quittieren */ 

29 hy7 if (class == CLOSEWINDOW) break; /« Fenster zul */ 

30 Kv if (dass »» HENUPICK) /» Menü angewählt! */ 

31 av8 while (code !« MENUNULL) ( 

32 UR9 Item = ItemAddress (äMenul.code); /« Strukturadress 

e des 

33 UMk letzten Menüpu 

nktes 

34 AJ holen */ 

35 JN9 printf ('Ausgewählt wurde Menü Xd mit dem Henüpunkt 

td und dem Unterpunkt <d.\n', 

36 OTI MENUNUM (code), ITEMNUM (code), SUBNUM(cod 

e)); 

37 SLR /» Angewählte Menüpunkte ausgeben 

V 

38 Ww9 Code = Item->NextSelect; /« Code des nächsten Men 

ü- 

39 JYc Punktes. Falls keiner 

da -> 

^0 xC code =« MENUNULL */ 

TD8 ) /« Schleife wird beendet, wenn kein weiterer MenOp 

unkt 

42 hrD ausgewählt wurde. »/ 

43 Cm6 ] /* Ende der while-Schlelfe »/ 

44 U03 j while (dass !* CLOSEWINDOW); 

45 Ua2 CloseWindow (MyWindow); 

46 nu CloseLlbrary (IntuitlonBase); 

47 100 i 
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Listing 3. Diese Technik verwenden Sie als Standard- 
Menüabfrage. 


ren Sie das einmal mit dem Me- 
nü-Auswertprogramm aus; es 
sind keine Programmänderun¬ 
gen erforderlich. 

Wenn Sie in Zukunft mit »Mu¬ 
tual Exclusion« arbeiten, ein 
Tip: Geben Sie immer zuerst al¬ 
le Menüpunkte ein und küm¬ 
mern Sie sich danach um den 
gegenseitigen Ausschluß. An¬ 
ders geht es schon deshalb 
nicht, weil PowerWindows ja bei 
der Eingabe des ersten Menü¬ 
punktes den dritten noch gar 
nicht kennt. 

Viele Textprogramme kön¬ 
nen nicht nur ASCII-Dateien, 
sondern auch andere Textfor¬ 
mate lesen. Doch wie sagt man 
dem Programm, welches For¬ 
mat es lesen soll? Am einfach¬ 
sten geht das mit einem Unter¬ 
menü für »Text laden«. Es soll 
die Menüpunkte »ASCII«, 
»Beckertext« und »UBM-Text« 
enthalten. Mit PowerWindows 
ist das kein Problem. Schalten 
Sie zunächst mit »Work on me- 
nuitems for... / Projekt« auf die 
Bearbeitung des Projekt- 
Menüs. Dann wählen Sie »Work 
on Subitems for... /Text laden«. 
PowerWindows zeigt ein Menü 
an, das dem vorhergehenden 
sehr ähnlich sieht. Es hat nur ei¬ 
nen neuen Menüpunkt: Mit 
»Number of columns« können 
Sie Ihre Untermenüpunkte in 
bis zu neun Spalten anordnen. 
Geben Sie nun »ASCII«, 
»Beckertext« und »UBM-Text« 
mit »Append Subitem« als Un* 
termenüpunkte ein. Wenn Sie 
das Menü ausprobieren, sehen 
Sie die neuen Unterpunkte, die 
von PowerWindows automa¬ 
tisch an die richtige Stelie ge¬ 
setzt wurden. 

Um die Nummer des ange¬ 
wählten Unterpunkts abzufra¬ 
gen, müssen wir unser Pro¬ 
gramm etwas ändern. Die Zeile 
36 wird zu: 

printf ("Menü: %ti Itera: 

%<i Subltera: Jgd", MENUNUM 
(Code),ITEMNUM(Code), 
SUBNUM(code); 

Auf diese Weise wird nun 
auch der gewählte Untermenü¬ 
punkt angezeigt. Falls kein Un¬ 
terpunkt existiert, so hat SUB- 
NUM(code) den Wert der Kon¬ 
stanten »NOSUB«. Unterme¬ 
nüs können genau wie normale 
Menüs mit Häkchen und 
Tastatur-Kommandos versehen 
werden. Probieren Sie es aus, 
es gibt viele Möglichkeiten! 

Ein weiteres wichtiges Menü- 
Flag ist »MENUTDGGLE«. »To 
toggle« bedeutet »hin- und her¬ 
schalten«. Dieses Flag ist nur 
bei Attribut-Items (denen mit 
dem Häkchen) sinnvoll. Ist es 
bei einem Menüpunkt gesetzt, 
so wird das Häkchen bei jedem 


Anwählen des Menüs umge¬ 
schaltet. Normalerweise ist das 
nicht der Fall - haben Sie schon 
einmal versucht, einen Zei¬ 
chensatz durch Anwählen sei¬ 
nes Namens wieder auszu¬ 
schalten? Es geht nicht. 

Ein gutes Beispiel für den 
Einsatz von MENUTDGGLE ist 
ein Textprogramm mit verschie¬ 
denen Schriftstilen wie Kursiv, 
Fett, Unterstrichen etc. Sie sol¬ 
len über ein Menü ausgewählt 
werden und sich dort jederzeit 
beliebig ein- und ausschalten 
lassen. Erzeugen Sie also bitte 
ein neues Menü namens 
»Schrift« mit den Menüpunkten 
»Kursiv«, »Unterstrichen«, 
»Fett«, »Hochgesetzt« und »Tief¬ 
gesetzt«. Dabei setzen Sie bei 
»Kursiv« die Flags CHECKIT, 
MENUTOGGLE und ROOM 
FOR CHECK. Bei den anderen 
Menüpunkten muß nur noch 
der Name eingegeben werden, 
weil PowerWindows die Flags 
automatisch so einstellt wie bei 
der letzten Eingabe. Schon ha¬ 
ben Sie ein Schriftenmenü, in 
dem jede Schrift beliebig ein- 
und auszuschalten ist. 

Geisternde 

Menüs 

Bei der Abfrage des neuen 
Menüs durch das Programm 
kann man vorgehen wie bisher. 
Trotzdem wird das Programm 
geändert: Es gibt die bisher 
nicht berücksichtigte Möglich¬ 
keit, daß man mehrere Menü¬ 
punkte gleichzeitig auswählt, 
was beispielsweise bei Schrift¬ 
arten recht häufig sein dürfte. 
Das haben Sie noch nie pro¬ 
biert? Na, dann halten Sie mal 
während der Menüauswahl wie 
üblich die rechte Taste fest und 
drücken beim gewünschten 
Menüpunkt auch noch die lin¬ 
ke. Schon kann man beliebig 
viele Häkchen aus- und ein¬ 
schalten. Um diesen Fall auch 
im Programm zu erkennen, gibt 
es das neue Abfrageprogramm 
in Listing 3. Dies ist übrigens die 
von Commodore-Amiga vorge¬ 
schlagene Standard-Menüab¬ 
fragetechnik. Sie sollten ab jetzt 
nur mit dieser Methode arbei¬ 
ten. 

In manchen Fällen kann es 
auch praktisch sein, direkt »bei 
Intuition anzufragen«, ob ein 
bestimmter Menüpunkt gerade 
ein Häkchen hat oder nicht. Die 
Funktion »IsChecked (Window, 
Menu.Item,Sub)« erledigt das 
für Sie (Listing 4). Die Parame¬ 
ter der Funktion sind im Listing 
erklärt. 

Eine wichtige Funktion von 
Intuition ist das »Ghosting«, al¬ 
so das Schreiben eines Menüs, 


Menüpunktes oder Untermenü¬ 
punktes in »Geisterschrift«, die 
deutlich macht, daß dieses 
Menü-Element im Moment 
nicht gewählt werden kann. 
Wenn Sie von vorne herein be¬ 
stimmte Menü-Elemente nicht 
wählbar machen wollen, ver¬ 
wenden Sie dazu das »ME- 
NUENABLED«-Flag (für ganze 
Menüs) beziehungsweise das 
»ITEMENABLED«-Flag (für Me¬ 
nüpunkte und Untermenüs). 
Diese Flags stehen in den je¬ 
weiligen Steuerfeldern für Me¬ 


nüs, Menüpunkte und Unter¬ 
menüs (Bild 4 und 5). Ist ME- 
NUENABLED oder ITEMENA- 
BLED ausgeschaltet, so kann 
der von diesem Flag betroffene 
Bereich nicht mehr angewählt 
werden. Dabei gilt: 

-Wenn Sie ein ganzes Menü 
abschalten, sind alle Menü¬ 
punkte und Unterpunkte dieses 
Menüs ebenfalls abgeschaltet. 
- Wenn Sie einen Menüpunkt 
abschalten, werden alle even¬ 
tuell vorhandenen Unterpunkte 
abgeschaltet. 
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1 ngO BOOL IsChecked (MenuA(lr,Henu,Iten,Sub) /• By Andy Lietz 5. 

2.89 »/ 

2 rz /* Diese Funktion prüft, ob ein bestimmter Menüpunkt in Mome 

nt mit 

3 Av3 einem Häkchen versehen ist. Wenn ja, gibt sie TRUE zurück 

4 kv sonst FA1£E. 

5 QM Parameter: MenuAdr Adresse des Menüs, normalerweise AHen 

ul. 

6 spE Menu Nummer des Menüs 

7 Sa Item Nummer des Menüpunktes 

8 wk Sub Nummer des Unterpunktes. Wird Ignorie 

rt, 

9 c7N falls der Jeweilige Henüpunkt keine 

10 AI Unterpunkte hat. 

11 303 Ein typischer Aufruf der Funktion sieht so aus: 

12 oj4 if {IsCheoked(8iHenul,1,1,0) prlntf ("Häkchen gefundenen 

') 

13 oz3 etc. 

»/ 

14 4V0 stinact Menu »MenuAdr; 

15 OS int Menu; 

16 yü int Item; 

17 Ro int Sub; 

18 Eh { 

19 152 struct Menuitem »Tempitem; 

20 YE Tempitem = 

21 wf7 ItemAddrees (MenuAdr,SHIFTMENU(Menu)l SHIFTITEM(Item)l 

SHIFTSUB(Sub)); 

22 SS3 If ((TempItem->Flags & CHECKED) == CHECKED) return (TRUE 

); 

23 tD 5 eise return(FAI^E); 

24 OtO ) 

(C) 1988 M&T 

Listing 4. Die Funktion »IsChecked« setzen Sie ein, wenn 
Sie wissen woiien, ob ein Menüpunkt einen »Haten« hat 


Um auch vom Programm aus 
Teile des Menüs ein- und aus¬ 
zuschalten, gibt es die Intuition- 
Funktionen »OnMenu« und 
»OffMenu«, die beide die ver¬ 
schlüsselte Menünummer als 
Parameter brauchen. Um mit 
»normalen« Menü-Werten (z. B. 
Menü 0, Punkt 1, Unterpunkt 1) 
zu arbeiten, verwenden Sie zu¬ 
sätzlich die MenuVal-Funktion 
(Listing 5). 

Noch etwas kann PowetWin- 
dows: langweilige Texte in Me¬ 
nüs durch Grafiken ersetzen. 
Wenn Sie einen Menüpunkt als 
Grafik gestalten wollen, müs¬ 
sen Sie die Grafik zeichnen und 


als IFF-Pinsel auf Diskette spei¬ 
chern (die Größe des Pinsels 
bestimmt auch die Größe des 
Menüpunktes). Nun wählen Sie 
»Work on Images for...« mit 
dem Menüpunkt, der durch ei¬ 
ne Grafik ersetzt werden soll. 
Es erscheint ein neues Menü. 
Mit »Load item render image« 
laden Sie eine Grafik für den 
nicht aktivierten Zustand des 
Menüpunktes; »Load item se- 
lect image« lädt eine Grafik für 
den aktivierten Zustand. Wenn 
Sie nur »Load item render ima¬ 
ge« verwenden, wird die Grafik 
- wie normaler Text - invertiert, 
falls man den Mauszeiger dar- 


1 XBO int MenuVal (menu,item,sub) 

2 EO /* Diese Funktion rechnet aus Menünummer, Menüpunkt und Unte 

r- 

3 7T3 punkt den verschlüsselten Menücode aus. 

4 ob Hat der verwendete Menüpunkt keinen Unterpunkt, sollten 

5 y5 Sie dafür NOSUB elnsetzen. 

6 JW Mögliche Aufrufe: 

7 UL MenuCode = MenuVal (0,1,NOSUB); 

8 tE MenuCode = MenuVal (2,3,4); 

9 kV etc. */ 

10 ppO int menu; 

11 zD int item; 

12 S1 int sub; 


return (SHIFTMENU (menu) 
b)); 


SHIFTITEM (item) I SHIFTSUB (au 


15 FkO ) 
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Listing 5. Die Funktion »MenuVal« errechnet aus den 
Menünummern den zugehörigen Code 


überbewegt. »Delete item ren¬ 
der imagery« und »Delete item 
select imagery« schalten die 
Grafiken für den jeweiligen Zu¬ 
stand wieder ab. Für Unterme¬ 
nüpunkte funktioniert das La¬ 
den von Grafiken genauso. 

Im Prinzip können Sie auch 
Menüs mit Grafiken ganz nor¬ 
mal in das Programm einbauen; 
wenn Sie mehr als 512 KByte 
Speicher haben, müssen Sie 
beim Compilieren mit Aztec C 
die Linker-Option »-nCd« ver¬ 
wenden, sonst sehen Sie spä¬ 
ter statt der Grafik irgendwel¬ 
chen Unsinn auf dem Schirm. 

Das 

Klick-Dingsda 

Mindestens genauso wichtig 
wie die Menüs sind die Gadgets 
(englisch für »Dingsda«) von In¬ 
tuition. Mit ihnen kann der Be¬ 
nutzer durch einen einfachen 
Mausklick auf ein Programm 
Einfluß nehmen. Intuition kennt 
drei unterschiedliche Gadget- 
Typen: 


üiiiaifla 

LEFT TOP 

CEDCO 

mn HEIQW 

□oco 


HEH0EN,^E'LED 


HENU TEXT 


"Automatische Menüformatierung. Die Werte werden ignoriert 


»Hitboxo-Koordinaten 


Menüs werden selbst formatiert. Geben Sie vernünftige Zahlenwerte 
'dafür ein, sonst gibt es Probleme 

-Das Menü kann angewählt werden, wenn MENUENABLED aktiv Ist 


--Name des Menüs 


ox cwca 

Bild 5. An diesem Requester brauchen Sie nichts einzustellen, wenn Sie Standard-Menüs 
erhalten wollen. Mit wenigen Mausklicks verändern Sie die Einstellungen. 


> das Boolean-Gadget: einfa¬ 
ches ja/nein-Gadget. Es wird 
mit der Maus angeklickt, um ir¬ 
gendeine Aktion des Pro¬ 
gramms hervorzurufen: 

- das String-Gadget; Es erlaubt 
das Eintippen von Zeichenket¬ 
ten, die vom Programm weiter¬ 
verwendet werden: 

- das Proporlional-Gadget: Es 
enthält einen »Schieberegler«, 
mit dem sich wie bei einem 
Lautstärkeregler verschiedene 
Werte mit der Maus einstellen 
lassen. 

Alle drei Typen werden von 
PowerWindows unterstützt. 

Gadgets können grundsätz¬ 
lich nur in Fenstern auftreten 
und werden beim Öffnen des 
Fensters, für das sie definiert 
wurden, automatisch mit ange¬ 
zeigt. Um mit Gadgets in Po- 
weiWindows arbeiten zu kön¬ 
nen, müssen Sie daher erst mit 
»Open a new window« ein Fen¬ 
ster öffnen, falls Sie das nicht 
schon getan haben. Setzen Sie 
bitte bei allen Gadget-Beispie- 
len wie bisher die Win¬ 
dow-Flags CLOSEWINDOW, 
WINDOWCLOSE und ACTIVA- 
TE zusätzlich zu denen, die von 
PowerWindows bereits einge¬ 
schaltet wurden. 

Wählen Sie aus dem »Gad- 
get«-Menü »Add a Gadget« (ein 
Gadget anhängen). Es er¬ 
scheint eine Dialogbox, die Sie 
einfach mit einem Klick auf 
»OK« bestätigen. Nun klicken 
Sie mit der Maus auf die ge¬ 
wünschte linke obere Ecke des 
Gadgets, machen es per Maus¬ 
bewegung so groß wie nötig (für 
dieses Beispiel sollte das Gad¬ 
get einen großen Teil des Fen¬ 
sters einnehmen) und drücken 
Sie noch mal die linke Mausta¬ 
ste. Schon ist das erste Gadget 
fertig. 

Wenn Sie in das umrahmte 
Feld mit der Maus hinein¬ 
klicken, wird es invertiert - Po- 
weiWindows hat also ein ech- 
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tes Gadget in das Fenster ein¬ 
gesetzt. Wenn Sie wollen, kön¬ 
nen Sie sich jetzt den Quell¬ 
code für dieses Gadget unter 

dem Namen »gadget_1.src« 

erzeugen lassen und ihn mit 

»include "gadget_t.src"« in 

das Window-Anzeigepro¬ 
gramm von Listing 2 einbauen. 
Sie sehen, daß zum Anzeigen 
von Gadgets das Programm 
nicht geändert werden muß. 

Wenn Sie Ihr Gadget an eine 
andere Stelle des Fensters be¬ 
wegen wollen, wählen Sie ein¬ 
fach »Move a Gadget«. Eine 
Dialogbox informiert darüber, 
daß man das gewünschte Gad¬ 
get mit der Maus anklicken und 
verschieben soll. Schalten Sie 
also die Dialogbox mit »OK« ab 
und verschieben Sie das Gad¬ 
get, wohin Sie wollen. Falls Sie 
mehrere Gadgets verwenden, 
achtet PowerWindows automa¬ 
tisch darauf, daß sie sich nicht 
überlappen - außer man schal¬ 
tet das »Gadget collision 
checking« im Preferences-Me¬ 
nü ab, was aber nicht zu emp¬ 
fehlen ist! Intuition liefert näm¬ 
lich unter Umständen unsinni¬ 
ge Informationen, wenn sich 
zwei Gadgets überlappen. 

Zum Verändern der Gadget- 
Größe dient »Resize a Gadget«. 
Klicken Sie nach der Anwahl 
dieses Menüpunktes wieder 
auf das OK-Feld der Dialogbox 
und dann auf das Gadget, das 
Sie in der Größe verändern wol¬ 
len. Den Mausknopf müssen 
Sie nicht festhalten. Stellen Sie 
die gewünschte Größe durch 
Bewegen der Maus ein und 
drücken Sie die linke Mausta¬ 
ste. 


Beim Arbeiten mit Gadgets 
verwendet PowerWindows im¬ 
mer dieselbe Technik: Nach der 
Anwahl eines Gadget-Menü- 
punktes klicken Sie auf das 
Gadget, mit dem Sie arbeiten 
möchten - dazu werden Sie mit 
einer Dialogbox aufgefordert. 
Wenn Sie diese Boxen nach ei¬ 
niger Zeit nicht mehr sehen wol¬ 
len, können Sie sie abschalten, 
indem Sie den Menüpunkt »OK 
prompts« im »Preferences«-Me- 
nü ausschalten. Mit <HELP> 
läßt sich die Dialogbox trotzdem 
auf Wunsch auf den Bildschirm 
holen, wenn Sie beispielsweise 
vergessen haben, welcher Be¬ 
fehl gerade gewählt wurde. 

Sollte es Ihnen passieren, 
daß PowerWindows kein Menü 
mehr anzeigt, wartet das Pro¬ 
gramm höchstwahrscheinlich 
auf das Anklicken eines Gad¬ 
gets. Drücken Sie dann 
<HELP>, um zu sehen, was 
das Programm von Ihnen er¬ 
wartet. 

Gadgets 
sind beweglich 

Wie Sie sicher schon ge¬ 
merkt haben, hat PowerWin¬ 
dows das erste Gadget automa¬ 
tisch als Boolean-Gadget defi¬ 
niert (man kann keine Zeichen 
eingeben oder Regier verschie¬ 
ben). Um sich die Sache ge¬ 
nauer anzusehen, wählen Sie 
bitte »Define Gadget Type« und 
klicken auf das Gadget. Nun er¬ 
scheint das Gadget-Steuerfeld 
(Bild 6). 

Sie sehen, daß links oben 
»BOOLEAN« aktiviert ist, es 
handelt sich also - wie bereits 


festgestellt - um ein BOO- 
LEAN-Gadget. Unten links ste¬ 
hen die Gadget-Flags; im Mo¬ 
ment sind »GADHCOMP« und 
»RELVERIFY« aktiviert. GAD- 
GHCOMP bedeutet, daß das 
Gadget beim Anklicken inver¬ 
tiert werden soll. Mit GADGH- 
BOX würde es beim Anklicken 
umrahmt werden, und GADGH- 
NONE sorgt dafür, daß beim 
Anklicken überhaupt nichts 
passiert. PowerWindows zeigt 
allerdings alle Gadgets mit 
GADGHCOMP an; diese Flags 
werden erst im Quellcode ge¬ 
setzt. RELVERIFY bedeutet 
ausgeschrieben »Release veri- 
fy«, was auf deutsch »Bestäti¬ 
gung beim Loslassen« bedeu¬ 
tet. Intuition informiert das Pro¬ 
gramm, zu dem dieses Gadget 
gehört, erst dann über die 
Gadget-Betätigung, wenn der 
Mauszeiger über dem Gadget 
wieder losgelassen wurde. Das 
gibt dem Programmanwender 
zusätzliche Sicherheit, da er 
nach einem Klick auf das Gad¬ 
get die Möglichkeit hat, seine 
Meinung zu ändern. 

Wie stellt man vom Pro¬ 
gramm aus fest, daß ein Gadget 
angeklickt wurde? Wie Sie si¬ 
cherschon geahnt haben, läuft 
das natürlich auch wieder mit 
dem IDCMP-System. Das Pro¬ 
gramm muß den »Class«-Wert 
der eintreffenden Intuition- 
Nachricht dann lediglich auf 
den Wert GADGETUP (Gadget 
losgelassen) oder GADGET- 
DOWN (Gadget gedrückt) prü¬ 
fen und das Ergebnis auswer¬ 
ten. Genau das macht Listing 6. 
Wenn Sie den Quellcode für 
das gerade definierte Gadget 


wieder unter dem Namen »gad¬ 
get_t.src« abspeichern und 

ihn in das Programm einbinden 
(der »include«-Befehl steht be¬ 
reits in Listing 6), sehen Sie fol¬ 
gendes: Sobald die Maustaste 
mit dem Zeiger über dem Gad¬ 
get wieder losgelassen wurde, 
gibt es eine GADGETUP- 
Meldung. 

Um auf das Anklicken eines 
Gadgets sofort reagieren zu 
können, sollten Sie statt REL¬ 
VERIFY das Flag GADGIMME- 
DIATE (»Gadget sofort«) setzen. 
Dann bekommt das Programm 
sofort eine GADGETDOWN- 
Nachricht, wenn der Maus¬ 
knopf mit dem Zeiger über dem 
Gadget gedrückt wurde. REL¬ 
VERIFY und GADGIMMEDIA- 
TE lassen sich übrigens auch 
kombinieren - probieren Sie 
aus, was dann passiert! 

Wenn Sie sich mit PowerWin¬ 
dows mehrere Boolean-Gad- 
gets definieren, werden Sie 
feststellen, daß das Auswer¬ 
tungsprogramm zwar brav 
»GADGETDOWN« oder »GAD¬ 
GETUP« meldet, zwischen den 
einzelnen Gadgets aber offen¬ 
bar nicht unterscheiden kann. 
Um sie unterscheiden zu kön¬ 
nen, muß jedes Gadget eine ei¬ 
gene Nummer bekommen. Die¬ 
se Nummer geben Sie im Gad¬ 
get-Steuerfeld unter »Gadget 
ID« ein. Sie ist ein Bestandteil 
der Gadget-Struktur und wird 
mit ihr im Quelltext abgelegt. 

Um die Nummer des ange¬ 
klickten Gadgets herauszufin¬ 
den, muß der Intuition-Pro¬ 
grammierer einen kleinen Um¬ 
weg gehen. Intuition setzt näm¬ 
lich in seine Gadget-Nachrich- 


»Nur-Rand«-Gadget. 
Siehe Text Seite 114 
Zum Einbau 
von Grafiken 


Gadget-Flags < 


Ein BOOL-Gadget 
wird erzeugt 


Ein P.ROP-Gadget 
wird erzeugt 


Erzeugung eines 
STRIN&Gadgets 


B'jOLE.fijj 


tfmggiBMHna 
SPECIAL GADGET 
TYPES 


PROPORTIONAL 


STRING 


String-Länge 


GADGET POSITION 


KBODY VMBY 

LENGTH 1 


LLtlUKiE T 

rnn r 

• I I I I 

imOBUFFER 

1 

GADGET S 


21 


BORDERONLY 


EM 


FREEVERT 


PROPDORIERLESS 


STRINGCEMTER 


SIRINGRIGIIT 


LOHGIMT 


HUITH KIGHT 


15 


11 




\ GMGMNONE 

1 SELECTED 

1 LEFTBORDER 1 

1 G.fil'GHCOMF 

lUKHSABLED 

1 »mm 1 


1 RIL'vTRIFY 

1 BOTTOHDORSERI 

GRELBOTTON IIGABGIMKEDIATS 

TOGGLESELECT 


1 ENBGABGET 

GZZGADGET 1 


1 FOLLOIMOHSE 

GADGET 

GREIEIGHT 


FLAGS 


BOOLKASK 


EXaUDE 
GADGETO 
USERDATA 
FIKTION 
SOURCE LABE 


OK 


CANCEL 


Gadget-Koordinaten 
und Größe 


'Von PW nicht benutzt 


M-Bei Kickstart 1.3 unbenutzt 


M}-Gadget-ID 


Name des Gadgets 
im Quelltext 


Bild 6. Bei Gadgets haben Sie viele Einstellmöglichteiten 
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Wie Sie vielleicht wissen, erwartet Intuition alle Gadgets eines Fen¬ 
sters als verkettete Liste. Das heißt, daß in jeder Gadget-Struktur ein 
Zeiger auf das folgende Gadget steht (oder NULL, wenn es das letzte 
war). Manche Intuition-Funktionen arbeiten mit Teilen von Gadget- 
Listen. Es kann also unter Umständen notwendig sein, die Reihenfol¬ 
ge der Gadgets in der Liste festzulegen. Dazu dienen drei Menüpunk¬ 
te des »Gadget«-Menüs: 

- »Move gadget to Start of list« bewegt das Gadget, das nun angeklickt 
wird, an den Anfang der Liste; 

- »Move gadget to end of list« bewegt ein Gadget an das Ende der 
Liste; 

- »Specify gadget successor« sagt dem Programm, daß »dieses« 
Gadget nach »jenem« in der Liste stehen soll. Für diesen Menüpunkt 
ist die Verwendung der »OK prompte« hilfreich. 


ten nicht die Gadget-Nummer, 
sondern im Feld »lAddress« die 
Adresse des angeklickten Gad¬ 
gets ein. Sie müssen also mit 

GadgetAdr = Message -> 
lAddressj 

die Adresse auslesen. Nun wird 
mit 

id = GadgetAdr -> 
GadgetID 

die vorher festgelegte Nummer 


abgeholt. Zusammen sieht das 
aus wie in üsting 7, das neben 
der Art der Gadget-Nachricht 
auch die Gadget-Nummer aus¬ 
gibt. Übrigens: Wenn Sie bei 
»Gadget ID« im PowerWindows- 
Gadget-Steuerfeld nichts ein¬ 
geben, hat das jeweilige Gad¬ 
get die Nummer 0. 

Die bisher verwendeten 
Boolean-Gadgets werden beim 
Anklicken komplementiert und 
gehen spätestens beim Loslas¬ 


sen der Maustaste wieder in 
den ursprünglichen Zustand 
zurück. Wenn Sie im Gadget- 
Steuerfeld das TDGGLESE- 
LECT-Flag setzen, wird das 
Gadget statt dessen beim An¬ 
klicken zwischen normalem 
und invertiertem Zustand um¬ 
geschaltet. Je nach der Einstel¬ 
lung von RELVERIFY und 
GADGIMMEDIATE bekommt 
das Programm bei jeder Um¬ 
schaltung entweder GADGET- 
UP, GADGETDOWN oder bei¬ 
des. Wenn Sie das Gadget be¬ 
reits beim Öffnen des Fensters 
im angewählten Zustand haben 
möchten, müssen Sie das SE- 
LECTED-Flag setzen. Dieses 
Flag kann das Programm übri¬ 
gens auch abfragen, beispiels¬ 
weise so: 

GadgetAdr = &Gadgetj 
if ((GadgetAdr->Flags & 
SELECTED) == SELECTED) 
printf ("Gadget ist 
angewählt!\n"); 
eise printf ("Gadget 
nicht angewählt.\n")j 
Davor müssen Sie mit 


struct Gadget * 

GadgetAdr; 

die Variable GadgetAdr dekla¬ 
rieren. Normalerweise nume¬ 
riert PowerWindows die ver¬ 
wendeten Gadget-Strukturen 
im Quelltext durch. Wenn Sie 
ein Gadget später auf das SE- 
LECTED-Flag testen wollen, 
tragen Sie im SOURCE LA- 
BEL-Feld des Gadget-Steuer- 
feldes von PowerWindows den 
gewünschten Namen ein - so 
können Sie später darauf zu¬ 
greifen. 

Um Ihre Gadgets auch mit 
Text zu versehen, verwenden 
Sie den Menüpunkt »Work on 
Gadget Text« und klicken auf 
das gewünschte Gadget. Es er¬ 
scheint ein neues Menü, das 
dieselben Textfunktionen wie 
der Textbefehl im »Current Win- 
dow«-Menü enthält. Sie können 
Gadget-Text ebenfalls an jeder 
beliebigen Stelle des Fensters 
positionieren. Im Gegensatz 
zum Window-Text wird Gadget- 
Text aber automatisch mit dem 
Gadget angezeigt, wenn das 


1 PeO 

#lnclude < intuition/Intuition.h> 

2 J7 

# Include < intultlon/intultlonbaee.h> 

3 dH 

#lnclude <functlon8.h> 

4 QT 

#include 'gadget.l.src' 

5 Y1 

struct IntuitionBase *IntuitlonBase; 

6 QQ 

main () 

7 3W 

l 

8 LK2 

struct Window »MyWlndow; 

9 sC 

struct IntuiHessage *Kessage; 

10 60 

struct Gadget «address; 

11 Ve 

int dass,Code,Id; 

12 sl 

int MenuNumber; 

13 eE 

APTR Item; 

14 VF 

If (1(IntuitionBase * (struct IntuitionBase *} 

15 gCB 

OpenLibrary ('intultion.llbrary',0))) 

16 z05 

(printf ('Intuition nicht gefunden? Panik!\n'); exlt (0 

17 972 

1 'i 

MyWindow « (struct Window ») OpenWindow (&NewWlndowStruetu 
rel); 

18 G4 

If (lMyWindow) (printf ('Fenster Hess sich nicht öffnenl' 

19 MTI 

) i 

CloseLlbrary (IntuitionBase); 

20 57 

exit (0);) 

21 hX2 

do [ 

22 p53 

Walt {1< <MyWlndow->UserPort->rap_SlgBlt); 

23 Iq4 

whlle (Message = GetMsg {MyWlndow->UeerPort)) 

24 Kn6 

i 

25 NW8 

dass « Message -> Class; 

26 NL 

Code « Message -> Code; 

27 4S 

address » Message -> lAddress; 

26 eC 

ReplyMsg (Message); 

29 31 

id = address -> GadgetID; 

30 h7 

if (class es GADGETUP) printf ('Gadget Äd upl\n',id) 

31 4X 

if (class == GADGETDOWN) printf ('Gadget « down!\n' 
.id); 

32 rL 

If (dass == CLOSEWINDOW) break; 

33 JK6 

] /* of while */ 

34 KE2 

] while (dass 1= CLOSEWINDOW); 

35 KQ 

CloseWlndow (MyWindow); 

36 dk 

CloseLlbrary (IntuitionBase); 

37 b60 

] 

(C) 1988 MIT 

Listing 6. Mit Hilfe der Flags »GADGETUP« und 

»GADGETDOWN« fragen Sie ab, ob der Anwender ein 

Gadget betätigt hat 





1 PeO 

#lndude <lntultlon/lntultion.h> 

2 J7 

# include < intuition/lntultlonbase.h> 

3 TX 

#include 'gadget_2.src' 

4 XO 

struct IntuitionBase »IntuitionBase; 

5 PP 

mein () 

6 2V 

! 

7 KJ2 

struct Window »MyWindow; 

8 rB 

struct IntulMessage »Message; 

9 5a 

struct Gadget »address; 

10 Ud 

int class,Code,id; 

11 rk 

int MenuNumber; 

12 dD 

APTR Item; 

13 yx 

if ((IntuitionBase = OpenLibrary ('Intuition.llbrary',0)) 

.= 0) 

14 xy5 

[printf ('Intuition nicht gefunden? PanlkiNn'); exlt (0 

);J 

MyWindow » (struct Window ») OpenWindow (iNewWindowStructu 

15 752 

rel); 

16 E2 

if (IMyWlndow) (printf ('Fenster Hess sich nicht öffnen!' 

17 KRI 

) t 

CloseLlbrary (IntuitionBase); 

18 35 

exit (0);) 

19 gN2 

ActivateGadget (SStrlng,MyWindow,NULL); /* Gadget aktivier 
en */ 

20 gW 

do 1 

21 o43 

Walt (1< <MyWindow->U8erPort->mp_SigBlt); 

22 Kp4 

while (Message = GetMsg (HyWindow->UeerPort)) 

23 Jm5 

( 

24 HV7 

class « Message -> Class; 

25 MK 

Code * Message -> Code; 

26 3R 

address « Message -> lAddress; 

27 dB 

ReplyMsg (Message); 

26 20 

id « address -> GadgetID; 

29 21 

if (class == GADGETUP && Id 1) 

30 Cg9 

printf (“Es wurde 'Ss' eingegeben.\n',StringSIBuff) 

31 qK7 

if (class =« CLOSEWINDOW) break; 

32 IJ5 

j /* of while »/ 

23 JD3 

j while (class !« CLOSEWINDOW); 

34 JP2 

CloseWlndow (MyWindow); 

35 cj 

CloseLlbrary (IntuitionBase); 

36 a50 

] 

(C) 1988 H&T 

Listing 7. String-Gadgets erfordern eine besondere 
Behandlung 
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Fenster geöffnet wird. Außer¬ 
dem verschiebt sich Gadget- 
Text mit, wenn sein Gadget ver¬ 
schoben wird. 

Auch Gadgets lassen sich 
mit Grafiken für den angeklick¬ 
ten und nicht angeklickten Zu¬ 
stand ausrüsten. Mit »Work on 
Gadget Images« gelangen Sie 
in das Gadget-Grafikmenü. 
Vorher sollten Sie natürlich die 
gewünschte Grafik mit einem 
Malprogramm gezeichnet ha¬ 
ben - speichern Sie das Bild in 
Form eines IFF-Pinsels mit der 
später benötigten Größe. Um 
ein Bild für den nicht angeklick¬ 
ten Zustand eines Gadgets zu 
laden, wählen Sie »Load gad¬ 
get render imagery«; eine Gra¬ 
fik für den angeklickten Zu¬ 
stand lädt man mit »Load gad¬ 
get select imagery«. Mit »Con- 
form hitbox to render size« paßt 
PowerWindows die »Hitbox« 
des Gadgets, also den Bereich, 
in dem das Gadget auf einen 
Mausklick reagiert, auf die Grö¬ 
ße der Grafik für den nicht an¬ 
geklickten Zustand an. »Con- 
form hitbox to render size« 
macht dasselbe für den ange¬ 
klickten Zustand. 

»Move gadget render image¬ 
ry« und »Move gadget select 
imagery« erlauben es, für die 
Grafiken des nicht angeklickten 
beziehungsweise des ange¬ 
klickten Zustands die Abstände 
von der linken oberen Ecke des 
Gadgets zu verändern. Sie sind 
normalerweise auf 0 einge¬ 
stellt. Schließlich können Sie 
mit den beiden »Delete«-Funk- 
tionen bereits geladene Grafi¬ 
ken wieder löschen. 

Gadgets klonen 
- kein Problem! 

Sehr praktisch ist die »Clone 
agadget«-Funktion. Damit kön¬ 
nen Sie ein völlig »baugleiches« 
Gadget herstelien, das Sie an 
einer beliebigen Stelle des Fen¬ 
sters positionieren. Neben der 
Größe des Gadgets werden 
auch alle Flags, Text etc. mitko¬ 
piert. Auf diese Weise kann 
man schnell umfangreiche Ein¬ 
gabefelder definieren, ohne im¬ 
mer wieder das gleiche einge¬ 
ben zu müssen. 

Normalerweise umrahmt Po¬ 
werWindows die Gadgets auto¬ 
matisch mit einem Rechteck in 
der bei »Add Gadget« einge¬ 
stellten Größe. Wenn Sie statt 
dessen Ihre eigene Umrah¬ 
mung festlegen möchten, wäh¬ 
len Sie »Work on Gadget Bor- 
ders« und klicken auf das ge¬ 
wünschte Gadget - Sie sind 
nicht auf rechteckige Rahmen 
beschränkt! Wie bei den »Work 
on...«-Funktionen üblich, er¬ 
scheint auch hierein neues Me¬ 


nü. Unter »Borders« stehen die 
Menüpunkte für die Erzeugung 
eines neuen Rahmens. Mit 
»Draw freehand border« kön¬ 
nen Sie einen Gadget-Rahmen 
»frei Hand« zeichnen. Sie 
klicken dazu mit der Maus auf 
den gewünschten Anfangs¬ 
punkt der Umrandung, bewe¬ 
gen den Mauszeiger zum Ende 
der Linie, klicken auf diesen 
Punkt, bewegen den Zeiger 
zum Ende der zweiten Linie, 
klicken darauf. Diese Prozedur 
wiederholt sich, bis Sie mit ei¬ 
nem Doppelklick abschließen. 
Das Wort »Rahmen« ist für die¬ 
sen Linienzug eigentlich miß¬ 
verständlich, da der Zug nicht 
geschlossen sein muß. 

»Draw rectangular border« 
zeichnet ein Rechteck auf die 
übliche Weise (linke obere Ecke 
anklicken, Maus auf die rechte 
untere Ecke bewegen, klick); 
»Draw square border« zeichnet 
einen quadratischen Rahmen. 
Dafür müssen Sie mit der Maus 
in die Mitte des gewünschten 
Quadrates klicken und mit der 
Maus seine Größe einstellen. 
Um die Farbe, den Zeichenmo¬ 
dus oder den Abstand zwi¬ 
schen Rahmen und Gadget zu 
verändern, verwendet man 
»Edit gadget border«. Und mit 
»Delete gadget border« löscht 
man einen selbstgemachten 
Rand wieder. 

Wichtig bei allen Border-Be- 
fehlen ist, daß die Gadget-»Hit- 
box« immer an derselben Stelle 
bleibt! Sie sollten das beim Be¬ 
arbeiten der Gadget-Rahmen 
immer berücksichtigen. 

Im »Other«-Menü gibt es ei¬ 
nen besonderen Menüpunkt: 
»Standard Border«. Wenn Sie 
dort »Off« wählen, erzeugen Sie 
Gadgets ohne jeden Rand. Das 
geht aber nur, wenn Sie keinen 
eigenen Rahmen definiert hat¬ 
ten - der müßte eventuell vorher 
mit »Delete gadget border« wie¬ 
der gelöscht werden. 

Bisher wurden alle Gadget- 
Menüpunkte von PowerWin¬ 
dows an Boolean-Gadgets aus¬ 
probiert. Sie sind mit Sicherheit 
die meistbenutzten Gadgets - 
deshalb sind String- und Pro- 
portional-Gadgets aber nicht 
weniger wichtig. Um ein String- 
Gadget zu erzeugen, müssen 
Sie wie üblich mit »Add a gad¬ 
get« die Größe festlegen. Nun 
aktivieren Sie mit »Define gad¬ 
get type« das Gadget-Steuer- 
feld und klicken in der oberen 
Zeile auf »STRING«. Die maxi¬ 
male Länge des einzugeben¬ 
den Strings müssen Sie bei 
»Length« auf den gewünschten 
Wert einstellen. Addieren Sie 
bitte zu diesem Wert noch eins 
hinzu, weil Intuition ein Byte 
des Strings als abschließendes 


Nullbyte braucht. Wenn der 
ganze String nicht in Ihr Gadget 
paßt, wird er von Intuition beim 
Eintippen gerollt. Werden aber 
mehr Zeichen eingegeben, als 
in »Length« angegeben, so 
blitzt der Bildschirm orange 
auf. Intuition kann bei der Ein¬ 
gabe den String entweder 
rechtsbündig oder zentriert 
schreiben - das stellen Sie mit 
»STRINGRIGHT« und »STRING¬ 
CENTER« ein. 

Eingebaute 

Editierfunktion 

Wenn Sie UNDOBUFFER 
einschalten, erzeugt Power- 
Windows automatisch einen 
Puffer für die UNDO-Funktion 
der String-Gadgets. Die kennen 
Sie nicht? Wenn Sie eine Ver¬ 
änderung In einem String- 
Gadget rückgängig machen 
wollen, probieren Sie es doch 
einmal mit < rechte-Amiga 
Q>. Hat das Gadget einen 
UNDO-Puffer, erscheint wieder 
die Version des Strings, die vor 


dem Anklicken des Gadgets 
existierte. Da ja immer nur ein 
String-Gadget den Puffer benö¬ 
tigt, erzeugt PowerWindows nur 
einen UNDO-Puffer. Er hat die 
Länge des längsten verwende¬ 
ten String-Gadgets. 

LONGINT macht das String- 
Gadget zu einem Zahlen-Gad- 
get. Hier können also nur Zif¬ 
fern eingegeben werden. Intui¬ 
tion rechnet die eingegebene 
Zahl automatisch in eine 32-Bit- 
Integerzahl um - wie man das 
im Programm auswertet, wer¬ 
den Sie gleich sehen. Bei der 
Eingabe der Zahl wird automa¬ 
tisch geprüft, ob sie sich in 32 
Bits unterbringen läßt. Da diese 
Zahl maximal zehn Stellen plus 
Vorzeichen haben kann, ist ei¬ 
ne größere Länge als zwölf für 
ein LONGINT-Gadget sinnlos. 

Zuerst zur Abfrage eines 
»normalen« String-Gadgets. 
Definieren Sie dazu bitte ein 
String-Gadget mit den Flags 
UNDOBUFFER und STRING¬ 
CENTER mit der Gadget-ID 1 
und dem Source-Label 
»String«. Die Länge des Strings 


1 PeO #include <lntuitlon/intultlon.h> 

2 J7 #include <lntultlon/intultlonba8e.h> 

3 dH #include <functlons.h> 

4 LD #lnclude 'gadget_prop.src' 

5 Y1 atmet IntultlonBase »IntuitlonBase; 

6 QQ Riain () 

7 3W ( 

8 LK2 atmet tflndow »MyWindowj 

9 sC atmet IntulMaaaage •‘Measagej 

10 60 atmet Gadget «addreaa; 

11 Ve Int cla8a,code,id; 

12 al int HenuNumber; 

13 eE APTR Item; 

14 VF if (I (IntultionBaae « (atmet IntuitlonBase ») 

15 gCB OpenLibrary ('Intuition.llbrary',0})) 

16 z05 (prlntf ('Intuition nicht gefunden? Panlkl\n'); exit (0 

);] 

17 972 HyWindow » (atmet Window *) OpenUlndow (&NewWindowStmetu 

rel); 

18 G4 If (IHyWindow) (printf {'Fenster lieas sich nicht öffnenl' 

)i 

19 HTI CloseLibrary (IntuitionBaae); 

20 57 exit (0);) 

21 hX2 do ( 

22 p54 Walt (1< <MyWlndow->UserPort->mp_SigBit); 

23 Iq8 while (Message = GetMsg (MyUindow->UserPort)) 

24 KnB { 

25 NWD dass = Message -> Claas; 

26 NL Code = Message -> Code; 

27 4S address = Message -> lAddresa; 

28 eC ReplyMsg (Message); 

29 31 iä = address -> CadgetID; 

30 66 if (dass == GADGETUP && Id «= 2) 

31 RuF ( 

32 Pdl printf ('Farbe = M\n",PropGadSInfo.HorlzP 

ot/4096); 

33 X2F j 

34 tND if (dass == CLOSEWINDOW) break; 

35 LMB ] /* ot while »/ 

36 MG6 ] while (dass 1= CLOSEWINDOW); 

37 MS2 CloseWindow (MyWlndow); 

38 fm CloseLibrary (IntuitionBaae); 

39 d80 ) 

(C) 1988 M4T 

Listing 8. Proportional-Gadgets können Sie mit Hilfe der 
Werte in »PropGadSlnfo« auswerten 
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können Sie beliebig wählen. 
Wichtig ist, daß Sie das Gadget- 
Flag RELVERIFY nicht aus¬ 
schalten. Vergessen Sie bitte 
nicht, im Window-Steuerfeld für 
das Fenster, in dem das Gadget 
später erscheinen soll, GAD- 
GETUP, GADGETDOWN, 
CLOSEWINDOW, WINDOW- 
CLOSE und ACTIVATE anzu- 
kiicken. Auf diese Weise erfährt 
unser Programm, wenn ein 
Gadget betätigt wurde oder das 
Fenster geschlossen werden 
soll - und das Fenster ist beim 
Start des Programms automa¬ 
tisch aktiv. 

Wenn ein String-Gadget vom 
Benutzer verwendet wird, er¬ 
fährt das Programm das erst, 
wenn nach der Eingabe < RE¬ 
TURN > gedrückt wurde - 
dann schickt Intuition eine 
GADGETUP-Meldung. Nun 
kann der eingegebene String 
ausgelesen werden. Jedes 
String-Gadget bekommt von 
PowerWindows automatisch ei¬ 
nen Speicherbereich zugewie¬ 
sen, in dem Intuition den String 
ablegen kann. Dieser Puffer hat 
den Namen »<Gadget-Na- 
me>SIBuff«, in diesem Fall al¬ 
so »StringSIBuff«. Mit einem 
einfachen »printf« holen Sie den 
String nun auf den Bildschirm. 
In Listing 8 funktioniert die Ab¬ 
frage nach .diesem Muster. So¬ 
bald das Programm eine GAD¬ 
GETUP-Meldung bekommt, 
prüft es auf die Gadget-ID 1 {die 
Sie vorher dem String-Gadget 
zugewiesen hatten) und druckt 
den eingegebenen String aus. 
Wenn Sie ein String-Gadget mit 
einem String »vorbesetzen« 
wollen, müssen Sie den jewei¬ 
ligen Speicherbereich vor dem 
Öffnen des Fensters, in dem 
das Gadget steht, initialisieren, 
zum Beispiel so: 
strcpy (StringSIBuff, 
"Dieser Text steht schon 
im Gadget!"); 

Wollen Sie in ein String-Gad¬ 
get etwas hineinschreiben, 
wenn das Fenster schon offen 
ist, so müssen Sie den Text in 
den entsprechenden Puffer 
schreiben und 

RefreshGadgets (gadgets, 
Window, requester) 
auf rufen. Dabei enthält »gad¬ 
gets« die Adresse des ersten 
Gadgets (bei PowerWindows- 
Gadgets normalerweise 
»Gadgett«), »window« die 
Adresse der Window-Struktur, 
in deren Fenster das Gadget 
steht, und »requester« die 
Adresse der Requester-Struk- 
tur, wenn die Gadgets in einem 
Requester stehen. Wenn nicht, 
muß für requester »NULL« ein¬ 
gesetzt werden. 


Im Listing 8 wurde außerdem 
die Funktion 

ActivateGadget (gadget, 
window,requester) 
verwendet. Diese Funktion er¬ 
spart das Anklicken von String- 
Gadgets - man kann also in 
dem String-Gadget, das damit 
aktiviert wurde, sofort lostip¬ 
pen. Die Parameter der Funk¬ 
tion sind denen von »Refresh¬ 
Gadgets« sehr ähnlich, aller¬ 
dings muß für »gadget« die 
Adresse des zu aktivierenden 
String-Gadgets angegeben 
sein. Für diese Funktion ist es 
besonders praktisch, wenn Sie 
Ihren verschiedenen String- 
Gadgets im Gadget-Steuerfeld 
von PowerWindows eigene Na¬ 
men geben, da man so die 
Gadget-Adresse problemlos 
angeben kann. Das Fenster, in 
dem das Gadget aktiviert wer¬ 
den soll, muß zu diesem Zeit¬ 
punkt ebenfalls aktiv sein! Des¬ 
halb sollten Sie das ACTIVE- 
WINDOW-Flag des Fensters 
auf jeden Fall setzen. Eine an¬ 
dere Möglichkeit ist, mit 

ActivateWindow (window) 

das Fenster zu aktivieren, wo¬ 
bei »window« ein Zeiger auf die 
Window-Struktur des zu akti¬ 
vierenden Fensters ist. 

Um die eingegebene Zahl 
bei einem LONGINT-Gadget 
abzufragen, müssen Sie das 
»Longlnt«-Feld der zu diesem 
Gadget gehörenden »Stringln- 
fo«-Struktur auslesen. Diese 
Strukturen haben bei Power¬ 
Windows den Namen <Gad- 
get-Name>Slnfo. Haben Sie 
also Ihr Nummern-Eingabe- 
Gadget »Zahl« genannt, erfah¬ 
ren Sie mit 

Eingabe = ZahlSInfo. 
Longint 

die eingegebene Zahl. 

Geregelte 

Schiebung 

Für die intuitive Benutzer¬ 
oberfläche des Amiga sind Pro- 
portionai-Gadgets sehr wichtig, 
weil man sich unter so einem 
»Schieberegler« sofort etwas 
vorstellen kann. Proportional- 
Gadgets (im folgenden Prop- 
Gadgets genannt) bieten vieler¬ 
lei Möglichkeiten: Der »Knopf« 
des Schiebereglers kann ent¬ 
weder waagerecht, senkrecht 
oder in beiden Richtungen ver¬ 
schoben werden - je nachdem, 
wie das Programm es vorsieht. 
Die Größe des Knopfes inner¬ 
halb des Schiebereglers ist be¬ 
liebig festlegbar und für den 
Benutzer leicht umzusetzen: 
Füllt beispielsweise der Knopf 
eines Scroll-Reglers bei einem 


Textprogramm ein Drittel des 
Reglers aus, so weiß man so¬ 
fort, daß gerade ein Drittel des 
Textes angezeigt wird. Wie Sie 
sicher wissen, kann man Prop- 
Gadgets auf zwei Arten an¬ 
klicken: Entweder man klickt 
auf den Knopf und verschiebt 
ihn beliebig weit; oder man 
klickt (bei einem waagerechten 
Regler) rechts oder links des 
Knopfes, um ihn um einen 
Schritt zu verschieben. 

Das Erzeugen von Prop- 
Gadgets ist mit PowerWindows 
sehr einfach. Legen Sie wie üb¬ 
lich unter »Add Gadget« die ge¬ 
wünschte Größe fest und akti¬ 
vieren Sie das Gadget-Steuer¬ 
feld für Ihr Gadget. In der ober¬ 
sten Zeile klicken Sie auf »PRO¬ 
PORTIONAL«. Unter diesem 
Wort finden Sie die Felder 
»HBODY« und »VBODY«; sie 
enthalten beide eine Null. In 
diesen beiden Feldern wird die 
horizontale beziehungsweise 
vertikale Schrittweite eingetra¬ 
gen, die das Gadget haben soll. 
Bei jedem Klick auf das Prop- 
Gadget neben dem Knopf wird 
der Knopf um diesen Wert ver¬ 
schoben; gleichzeitig gibt der 
Schrittweiten-Wert die Größe 
des Knopfes an. Wenn Sie zur 
Farbeinstellung ein Gadget mit 
16 Schritten definieren, hat der 
Gadget-Knopf ein Sechzehntel 
der Gadget-Größe, und der ge¬ 
samte Regler ist in 16 Schritte 
aufgeteilt. 

Etwas weiter unten sehen Sie 
die Flags »FREEHORIZ«, 
»FREEVERT« und »PROPBOR- 
DERLESS«. FREEHORIZ und 
FREEVERT geben den Gad¬ 
get-Knopf sozusagen in waage¬ 
rechter und senkrechter Rich¬ 
tung »frei«. Sie müssen also 
mindestens eines dieser bei¬ 
den Flags setzen und entspre¬ 
chend einen Schrittweiten-Wert 
eintragen. Sind FREEHORIZ 
und FREEVERT gesetzt, so 
kann sich der Gadget-Knopf in¬ 
nerhalb des Gadgets frei bewe¬ 
gen. PROPBORDERLESS 
sollten Sie nur setzen, wenn Sie 
nicht möchten, daß Intuition 
dieses Gadget automatisch mit 
einem Rand versieht. Erzeugen 
Sie also ein Prop-Gadget mit 
FREEHORIZ und HBODY 16. 
Geben Sie ihm die ID 1 und den 
Namen PropGad. Übrigens: 
»Work on Gadget Borders« 
funktioniert bei Prop-Gadgets 
nicht, da diese keinen selbstge¬ 
machten Rahmen haben. 

Haben Sie alles eingestellt? 
Dann verlassen Sie das Gad¬ 
get-Steuerfeld und probieren 
das Prop-Gadget aus. Experi¬ 
mentieren Sie mit den Schritt¬ 
weiten und Flags, um Erfahrun¬ 
gen damit zu sammeln. Wenn 
Sie den Quelltext für ein Prop- 


Gadget speichern (unter dem 
Namen »gadget_prop«), ver¬ 

merkt PowerWindows die ak¬ 
tuelle Stellung des Knopfes als 
Startposition. 

Für die Abfrage eines Prop- 
Gadgets sind zwei Variablen 
sehr wichtig: HorizPot und Vert- 
Pot. In diesen beiden Variablen 
steht die horizontale bezie¬ 
hungsweise vertikale Position 
des Schiebereglers. Sie stehen 
in der »Proplnfo«-Struktur jedes 
Prop-Gadgets. Diese Struktur 
bekommt von PowerWindows 
den Namen <Gadget-Na- 
me>Slnfo - im Beispiel also 
»PropGadSlnfo«. 

Um die Stellung des Gadgets 
im Programm richtig abfragen 
zu können, müssen Sie wissen, 
daß Intuition die Prop-Gadget- 
Werte grundsätzlich als 16-Bit- 
Integerzahlen venwaltet. Steht 
der Regler (bei einem horizon¬ 
talen Prop-Gadget) ganz links, 
so ist HorizPot 0; steht er am 
rechten Anschlag, ist HorizPot 
65535. Haben Sie also ein Gad¬ 
get mit der Schrittweite 16 defi¬ 
niert, müssen Sie den entspre¬ 
chenden Wert durch (65536/ 
16), also durch 4096, teilen, um 
Werte zwischen 0 und 15 zu er¬ 
halten. Im Listing 10 ist das mit 
dem vorher definierten Prop- 
Gadget ausgeführt. 

Die Einstellung 
des Schiebers 

Zwei weitere Variablen in der 
Proplnfo-Struktur sind eben¬ 
falls wichtig: HorizBody und 
VertBody. Sie geben die Größe 
des Gadget-Knopfes im Ver¬ 
hältnis zum gesamten Gadget 
an. Es handelt sich ebenfalls 
um 16-Bit-Variablen: Bei einem 
Wert von 65535 wäre also das 
gesamte Gadget ausgefüllt. 
Um aus einer gewünschten 
Schrittweite auf den HorizBo¬ 
dy- beziehungsweise VetlBody- 
Wert zu kommen, müssen Sie 
einfach 65536 durch die 
Schrittweite dividieren - Power¬ 
Windows macht das automa¬ 
tisch. Interessant wird diese 
Tatsache, wenn Sie die Werte 
eines Prop-Gadgets in einem 
Programm verändern wollen. 
Dazu dient die Funktion 

ModifyProp (gadget, 
window, requester, 
flags, horizPot, 
vertPot, horizBody, 
vertBody)j 

»gadget«, »window« und »re¬ 
quester« dürften inzwischen 
schon bekannt sein, »flags« ent¬ 
hält die Flags für das Proportio- 
nal-Gadget. Wenn Sie sie nicht 
verändern wollen, setzen Sie 
dafür einfach <GadgetName> 
SInfo.Flags ein. Wollen Sie et- 
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was verändern, denken Sie dar¬ 
an, das AUTOKNOB-Flag zu 
setzen, weil sonst der Gadget- 
Knopf spurlos verschwindet! In 
»horizPot«, »vertPot«, »horiz- 
Body« und »vertBody« werden 
die neuen Werte für diese Varia¬ 
blen eingetragen. 

Gerade bei Prop-Gadgets ist 
es oft notwendig, daß sich die 
Größe des Gadgets mit der Grö¬ 
ße des Windows, in dem es sich 
befindet, verändert oder daß 
das Gadget an den Fensterkan¬ 
ten »klebt«. Ein Beispiel dafür 
wäre der Scrollbalken eines 
Textprogramms, der sich den 
Größenveränderungen des 
Textfensters anpassen muß. Zu 
diesem Zweck dienen die 
Gadget-Flags »GRELBOT- 
TOM«, -GRELRIGHT«, »GREL- 
WICfTH« und »GRELHEIGHT«. 
»GREL« bedeutet »Gadget rela¬ 
tiv« > relativ in diesem Fall zur 
Größe des Fensters. Sind 
GRELWIDTH oder GREL- 
HEIGHT gesetzt, so paßt Intui¬ 
tion die Gadgetbreite bezie¬ 
hungsweise -höhe bei jeder Än¬ 
derung der Fenstergröße an. 
GRELBOnOM und GREL- 
RIGHT halten den Abstand des 
Gadgets zur unteren und rech¬ 
ten Fensterkante konstant. 
Wenn Sie mit diesen Flags un¬ 
ter PowerWindows arbeiten, 
sollten Sie die Größenverhält¬ 
nisse und Abstände nach Ihren 
Wünschen einstellen und die 
gewünschten Flags setzen. Die 
Flags wirken sich aber nicht bei 
der Arbeit mit PowerWindows, 
sondern erst im eigenen Pro¬ 
gramm aus. Die Größenverhält¬ 
nisse bleiben bei jeder Einstel¬ 
lung des Fensters erhalten. 
Wird dieses System auf ein 
Prop-Gadget angewandt, paßt 
Intuition die Knopfgröße immer 
auf die aktuellen Größenver¬ 
hältnisse an. Die GREL-Flags 
beherrschen Sie am leichtesten 
durch Ausprobieren - hier ist 
Experimentieren wirklich der 
beste Weg, um mit der Materie 
zurechtzukommen. Im allge¬ 
meinen kann man sagen, daß 
es meist sinnlos ist, mehr als 
zwei GREL-Flags gleichzeitig 
zu setzen. 

Um einen eigenen Knopf für 
ein Prop-Gadget zu erzeugen, 
verwenden Sie einfach »Work 
on gadget images« für das 
Prop-Gadget. 

Gadgets kann man ebenso 
wie Menüs inaktiv machen, so 
daß sie nicht mehr angewählt 
werden können. Wenn ein Gad¬ 
get von Anfang an abgeschaltet 
sein soll, schalten Sie sein 
»GADGDISABLED«-Flag ein. 
Leider ist diese Funktion eben¬ 
falls erst im späteren Programm 
zu sehen - noch nicht während 
der Arbeit mit PowerWindows. 


Um Gadgets im Programm ein- 
und auszuschalten, verwenden 
Sie 

OnGadget (gadget,window, 
requester) 
beziehungsweise 
OffGadget (gadget, 
window,requester) 

Die Parameter sind diesel¬ 
ben wie bei den anderen Gad- 
get-Funktionen. 

PowerWindows stellt sogar 
zwei »Gadget-Typen« zur Verfü¬ 
gung, die Intuition eigentlich 
gar nicht kennt. Es handelt sich 
dabei um die »BORDER ONLY«- 
und die »IMAGE ONLY«-Gad- 
gets. Streng genommen sind 
das natürlich keine neuen Gad- 
get'Typen, sondern sinnvolle 
Anwendungen der vorhande¬ 
nen. BORDER ONLY dient da¬ 
zu, beliebige Linienzüge in ein 
Fenster zu zeichnen, die Grup¬ 
pen von Gadgets umrahmen. 
Dazu definieren Sie mit »Add 
Gadget« ein normales Gadget 
(wenn Sie andere Gadgets 
umrahmen wollen, müssen 
Sie das »Gadget collision 
checking« im Preferences-Me¬ 
nü abschalten). Wenn Sie wol¬ 
len, können Sie den Rahmen 
natürlich mit »Work on gadget 
borders...« noch verändern 
und beispielsweise durch einen 
Linienzug ersetzen. Wenn Sie 
nun im Gadget-Steuerfeld 
BORDER ONLY anklicken, 
schreibt PowerWindows ledig¬ 
lich eine Border-Struktur für 
den gerade definierten Rah¬ 
men oder Linienzug in den 


Quelltext - auch wenn es wäh¬ 
rend der PowerWindows-Be- 
nutzung so scheint, als befinde 
sich an dieser Stelle ein Gad¬ 
get. Wenn Sie mehrere BOR¬ 
DER ONLY-Gadgets verwen¬ 
den, wird im Quelltext eine ver¬ 
kettete Liste von Border- 
Strukturen erzeugt. Darnit die¬ 
se automatisch beim Öffnen 
des Fensters angezeigt wer¬ 
den, klicken Sie im Quelltext- 
Steuerfeld (Bild 3) auf »Borders/ 
Images Gadget«. Nun erzeugt 
PowerWindows ein unsichtba¬ 
res Mini-Gadget, das als Ver¬ 
bindung zwischen Border- 
Struktur und Window dient. 

Requester 

leichtgemacht 

Dasselbe Verfahren gibt es 
bei IMAGE ONLY auch für Gra¬ 
fiken, die Sie beliebig in Ihrem 
Fenster verteilen können. Dazu 
müssen Sie ein Gadget erzeu¬ 
gen und es mit »Work on gadget 
images« mit einer Grafik verse¬ 
hen. Nun aktivieren Sie wieder 
»Borders/Images Gadget«. Po¬ 
werWindows bringt dann wie 
bei BORDERS ONLY die als 
IMAGE ONLY definierten Grafi¬ 
ken auf den Schirm. Die Ein¬ 
stellung der Gadget-Flags 
spielt bei BORDER ONLY und 
IMAGE ONLY-Gadgets keine 
Rolle - sie wird von PowerWin¬ 
dows automatisch vorgenom¬ 
men. Bei diesen beiden 
»Gadget-Typen« wird Gadget- 
Text nicht angezeigt. Wenn Sie 
für den angeklickten Zustand 


Ihres IMAGE ONLY-Gadgets ei¬ 
ne Grafik laden, wird sie beim 
Schreiben des Quelltextes 
nicht berücksichtigt. 

Ein Requester ist ein speziel¬ 
les Eingabefeld, das vom Pro¬ 
gramm aus mit »Request (re¬ 
quester)« aufgerufen wird. Er 
kann wie ein Fenster Gadgets, 
Texte und Grafiken enthalten, 
aber keine Menüs. Die Beson¬ 
derheit beim Requester ist, daß 
er jede Eingabe an das Fenster, 
von dem er aufgerufen wurde, 
blockiert. Ein Requester ver¬ 
schwindet automatisch vom 
Bildschirm, sobald ein Gadget 
angeklickt wird, das als »Ende- 
Gadget« markiert ist. Reque¬ 
ster sollten Sie dann benutzen, 
wenn Sie eine Reaktion des 
Programmanwenders erzwin¬ 
gen wollen - er muß zumindest 
aut »Ende« oder »Cancel« 
klicken, um den Requester wie¬ 
der verschwinden zu lassen. 

PowerWindows unterstützt 
Requester, aber leider nicht 
sehr komfortabel. Im Window- 
Steuerfeld befindet sich links 
unten das Feld »TYPE«. Wenn 
Sie auf das danebenstehende 
»WINDOW« klicken, verwandelt 
es sich in »REOUESTER«. Nun 
erzeugt PowerWindows statt ei¬ 
nem Fenster einen Requester. 

Ein Requester wird immer in 
Zusammenhang mit einem 
Fenster aufgerufen - alle Einga¬ 
ben (Gadget-Nachrichten) des 
Requesters werden an dieses 
Fenster geschickt. Gleichzeitig 
wird die Eingabe des Fensters 
blockiert. Außerdem muß der 
Requester in diesem Fenster 
Platz haben. Um mit PowerWin¬ 
dows einen zu erzeugen, ver¬ 
wenden Sie zunächst wieder 
»Open a new window«. Geben 
Sie diesem Fenster die zusätzli¬ 
chen Flags CLOSEWINDOW, 
WINDOWCLOSE und ACTIVA- 
TE. Das Fenster sollte einen 
großen Teil des Bildschirms 
ausfüllen, um später den Re¬ 
quester aufzunehmen. Nun de¬ 
finieren Sie ein zweites Fenster, 
das die Umrisse des späteren 
Requesters angibt. Beachten 
Sie bei der Positionierung die¬ 
ses Fensters, daß der Reque¬ 
ster später so weit von dem 
Fenster, mit dem er aufgerufen 
wird, entfernt ist, wie jetzt von 
der linken oberen Bildschirm¬ 
ecke. Diese Tatsache erfordert 
einiges Probieren, um damit 
vertraut zu werden. 

Aktivieren Sie nun das Win¬ 
dow-Steuerfeld und schalten 
Sie TYPE für das neue Fenster 
auf REQUESTER um. Sie soll¬ 
ten sämtliche Window-Flags 
(auf der rechten Seite des Fel¬ 
des) außer SMART_REFRESH 
ausschalten. Jeder Requester 
benötigt mindestens ein Gad- 


1 PeO 

#include <intuition/intultion.h> 

2 J7 

#Include <intuition/intuitionbase.h> 

3 dH 

#lnclude <function8.h> 

4 Cy 

#Include "requester.src' 

5 yi 

stnict IntuitionBase »Intuitlonßasej 

6 QQ 

raain (} 

7 3M 

( 

8 LK2 

atmet Window »MyWlndowj 

9 sC 

stmet IntulMessage «Message; 

10 60 

stmet Gadget «address; 

11 Ve 

int dass,Code,id; 

12 sl 

int MenuNumber; 

13 eE 

APTR Item; 

14 VF 

if (! (IntuitionBase * (stmet IntuitionBase «} 

15 gCA 

OpenLibrary ('Intuition.llbrary0))) 

16 jy5 

[prlntf ('Intuition nicht gefunden? Wae ist l 08 ?\n'); e 
xit (0);] 

17 972 

KyWlndow = (stmet Window »} OpenWindow (&NewWlndowStmctu 
rel); 

18 04 

if (IMyVindow) (prlntf ('Fenster Hess sich nicht öffneni* 

); 

CloseLibrary (IntuitionBase); 

19 HTI 

20 57 

exit ( 0 ) 5 ) 

21 ec2 

Request (iRequesterStmcture2,MyWindow); 

22 p5 

Walt (1< < MyWindow-> UserPort-> mp_SlgBlt); 

23 8E 

CloseWindow (MyWindow); 

24 RY 

CloseLibrary (IntuitionBase); 

25 PuO 

) 

(C) 1988 MiT 

Listing 9. Auch Requester verwalten Sie mit 

PowerWindows sehr einfach 
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get, mit dem er beendet werden 
kann, sonst werden Sie ihn nie 
mehr los. Bauen Sie also ein 
Bootean-Gadget in den Reque- 
ster ein, geben Sie ihm den Text 
»Ende.« und klicken Sie im 
Gadget-Steuerfeld für dieses 
Gadget auf ENDGADGET Die¬ 
ses Ftag ist sehr wichtig: Es 
sagt Intuition, daß es den Re- 
quester wieder vom Bildschirm 
nehmen soll. Um einen Reque- 
ster auf den Schirm zu bringen, 
verwendet man die Funktion 

Request (Requester, 
Window) 

»Requester« ist ein Zeiger auf 
eine Requester-Struktur, in die¬ 
sem Fall »&RequesterStructu- 
re2«. »Window« ist der Zeiger 
auf die Window-Struktur des 


Fensters, zu dem der Reque- 
ster gehört. 

In Listing 10 wird der soeben 
definierte Requester auf den 
Bildschirm gebracht, wozu Sie 
vorher mit PowerWindows den 
Quellcode als »Requestersrc« 
abspeichern müssen. Intuition 
entfernt den Requester auto¬ 
matisch, sobald »Ende.« ange¬ 
klickt wird. Ein Klick auf das 
Schließ-Gadget des Fensters 
beendet das Programm. Wie 
Sie sehen, hat der Requester 
eine weiße Hintergrundfarbe 
(falls Sie mit den üblichen 
Workbench-Farben arbeiten). 
Diese Farbe kann man im 
»BLOCK«-Feld am rechten 
Rand des Window-Steuerfel¬ 
des ändern. Wenn der Reque¬ 
ster die Hintergrundfarbe 0 hat, 
sollten Sie ihn mit Hilfe eines 


BORDER ONLY-Gadgets um¬ 
rahmen. 

Eine besondere Form von 
Requestern sind »Double-Me- 
nu«'Requester. Sie werden 
durch einen Doppelklick auf die 
rechte Maustaste aufgerufen. 
Dazu definieren Sie mit Power- 
Windows einen normalen Re¬ 
quester und rufen im Pro¬ 
gramm die Funktion 

SetDMRequest (Window, 
Requester) 

auf. Die Parameter dieser Funk¬ 
tion sind gegenüber der Re¬ 
quest-Funktion vertauscht > ei¬ 
ne beliebte Fehlerquelle. Bel 
Doubie-Menu-Requestern gibt 
es eine Besonderheit: Man 
muß sie mit 

EndRequest (Requester, 
Window) 


selbst wieder »vom Bildschirm 
holen«. Dazu sollten Sie auf ei¬ 
ne Gadget-Nachricht aus die¬ 
sem Requester warten und ihn 
dann en^ernen. Mit 

ClearDMRequest (Window, 
Requester) 

schaltet man einen Double- 
Menu-Requester wieder ab, so 
daß er nicht mehr per Doppel¬ 
klick gewählt werden kann. 

Wir sind nun am Schluß des 
ersten Workshops im AMIGA- 
Sonderheft angelangt. Hoffent¬ 
lich können Sie die Vorteile von 
PowerWindows in Zukunft noch 
besser nutzen. Wenn es eine 
Meisterschaft im Fensterin gä¬ 
be, würden Sie mit den erwor¬ 
benen Kenntnissen jetzt be¬ 
stimmt ganz vorn in der Rang¬ 
liste liegen. (Andr&as Uetz/so) 


Dem CU das 
Handwerk gelegt 


Mit dem CLI ist den Entwicklern des Amiga 
kein Meisterwerk gelungen. Spartanische 
Editiermöglichkeiten, schlechte Benutzer¬ 
führung und fehlende Mausunterstützung 
lassen den Workbench-verwöhnten An¬ 
wender schnell vemveifeln. »ExCLI« bringt 
Ihnen den lange vermißten Komfort. 


C omputer gelten nicht zu 
Unrecht als fleißig aber 
dumm. Leider schei¬ 
nen sie allzu oft diese Eigen¬ 
schaften auch beim Benutzer 
zu erwarten. Gehören Sie zu 
den geduldigen Zeitgenossen, 
die nach jedem kleinen Tipp¬ 
fehler im CLI schuldbewußt die 
Fehlermeldung entgegenneh¬ 
men und von vorne zu tippen 
anfangen? Oder revoltieren Sie 
gelegentlich mit einem kräfti¬ 
gen Fluch gegen die Arroganz 
des Systems, das Ihnen diese 
endlosen Tippübungen aufer¬ 
legt? 

Wenn Sie Ihr CLI auch 
manchmal ven/vünschen, soll¬ 
ten Sie sich »ExCLI« näher an- 
sehen: 

ExCLI ist eine neue Oberflä¬ 
che, die dem CLI »die Hände 
bindet« und dessen Aufgaben 
übernimmt. Nach dem Start ha¬ 
ben Sie erweiterte Editiermög¬ 
lichkeiten. Ausgeführte Befehle 
können wieder auf den Bild¬ 
schirm geholt und - eventuell 
nach Korrektur - erneut gestar¬ 
tet werden {»History«-Funktion). 
Eingebaute Befehle beschleu¬ 
nigen häufig benutzte CLI-Ope- 
rationen wie »cd«, »dir« oder »ty¬ 
pe«. Sie können sich beliebige 
Zeichenfolgen als Kommando 
definieren, die auf einen Ta¬ 
stendruck hin ausgeführt v/er- 
den. <HELP> bringt jederzeit 
eine Hilfsseite mit den wichtig¬ 


sten Befehlen und der aktuellen 
Funktionstastenbelegung auf 
den Bildschirm. 

Haben wir Ihnen den Mund 
wässrig gemacht? Dann sollten 
Sie »ExCLI.c« (Listing 1) abtip¬ 
pen und mit Aztec-C überset¬ 
zen. Die Aufrufe lauten: 

cc ExCLI +1 
ln ExCLI -lc32 

Wenn Sie sich das Abtippen 
ersparen wollen, finden Sie auf 
der Programmservicediskette 
eine lauffähige Version ein¬ 
schließlich Sourcecode. Bevor 
Sie ExCLI starten, stellen Sie si¬ 
cher, daß einige Voraussetzun¬ 
gen erfüllt sind: ExCLI richtet 
ein logisches Laufwerk mit Na¬ 
men »C« in der RAM-Disk ein. 
Wenn Sie Ihre gewohnten CLI- 
Befehle benutzen wollen, soll¬ 
ten Sie diese entweder vor dem 
Start von ExCLI in dieses Ver¬ 
zeichnis kopieren oder die Zeile 

Path SyS:c add 


eingeben. Damit ExCLI korrekt 
arbeitet, müssen folgende Files 
auf der Startdiskette sein: 

- »c/assign« 

- »c/copy« 

- »c/run« 

- »l/RamHandler« 

Wenn Sie sicher sind, daß 
diese Voraussetzungen erfüllt 
sind, starten Sie ExCLI entwe¬ 
der durch Doppelklick auf das 
Icon oder vom CLI aus mit 

excli 

gefolgt von < RETURN >. Das 
Programm richtet - soweit noch 
nicht vorhanden - eine RAM- 
Disk mit dem Unterverzeichnis 
»C« ein. Die Files »assign« und 
»run« werden in dieses Ver¬ 
zeichnis kopiert. Darauf wird es 
per »assign« zum logischen 
Laufwerk »C:«. Wenn Sie alle 
benötigten Befehle, die in Ex- 
CLI nicht enthalten sind, in die¬ 
ses »Laufwerk« kopieren, brau¬ 
chen Sie nicht ständig die Sy¬ 
stemdiskette einlegen und kön¬ 


nen bequem mit einem Lauf¬ 
werk arbeiten. 

Natürlich können Sie diese 
Operationen auch mit einem 
sogenannten »Batchfile« ver¬ 
einfachen. Sehen Sie sich dazu 
unser Beispiel »ExCLI.bat« an 
(Listing 2). ExCLI sucht im ak¬ 
tuellen Verzeichnis nach der 
Datei »ExCLI.key«. In dieser 
sind die zuletzt gespeicherten 
Tastaturbelegungen enthalten. 
Ist dieses File vorhanden, so 
wird diese Belegung geladen. 
Wenn nicht, startet ExCLI mit 
der Standard-Belegung. Zuletzt 
richtet sich ExCLI noch das 
CLI-Fenster für seine Zwecke 
ein. Dadurch sparen Sie Spei¬ 
cherplatz, denn Sie brauchen 
für ExCLI kein eigenes Fenster. 

Beschleunigung 

durch 

Einbau-Befehle 

ExCLI hat 13 eingebaute 
f^mmandos. Diese müssen 
nicht geladen werden, wodurch 
die Arbeit beschleunigt wird. 
ExCLI unterscheidet bei Befeh¬ 
len zwischen Groß- und Klein¬ 
schreibung. Alle eingebauten 
Befehle sind in Kleinbuchsta¬ 
ben. Bei gleichlautenden CLI- 
Befehlen (beispielsweise »dir« 
und »DIR«) können Sie einen 
beliebigen Buchstaben als 
Großbuchstaben angeben, um 
das CLI-Äquivalent zu starten. 
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Die neuen Befehle im Über¬ 
blick: 

dir listet Directory-Einträge 
auf ähnliche Weise wie das ent¬ 
sprechende CLl-Kommando. 
Unterverzeichnisse werden 
farblich abgehoben, die Größe 
der Files angezeigt. 

cd legt das aktuelle Verzeich¬ 
nis fest. 

pfad zeigt alle Suchpfade an. 
del löscht ein angegebenes 
File. 

mdir legt ein neues Unterver¬ 
zeichnis an. 

ren benennt einen Eintrag 
um. 

type gibt den Inhalt eines Fi¬ 
les auf den Bildschirm aus. Das 
File wird im Gegensatz zum 
CLI-Type seitenweise gelistet 
und eventuell enthaltene Steu¬ 
erzeichen werden unterdrückt, 
so daß beim Listen von Binär¬ 
dateien der Bildschirminhalt 
nicht zerstört wird. 

help zeigt eine Hilfsseite an. 
Diese enthält die eingebauten 
Befehle sowie die aktuelle Bele¬ 
gung der Funktionstasten. 

cIs löscht den Fensterinhalt 
und setzt das Prompt in die lin¬ 
ke obere Ecke. 

save speichert die aktuelle 
Tastenbelegung im File>»ExCLI. 
key«. Wenn Sie vermeiden wol¬ 
len, daß im aktuellen Verzeich¬ 
nis gespeichert wird, müssen 
Sie das Verzeichnis als Argu¬ 
ment übergeben. 

view Belegung einer Taste 
feststellen: 

»view A« zeigt die Belegung 
von <SHIFT a>. 

new löscht eine Tastenbele¬ 
gung. 

exit beendet ExCLI. 
Daneben können Sie natür¬ 
lich weiterhin alle Befehle ver¬ 
wenden, die im logischen Lauf¬ 
werk »C;« liegen oder in einem 
der mit einem Suchpfad beleg¬ 
ten Verzeichnisse. 

Ein großer Nachteil des CLI 
sind die fehlenden Editiermög¬ 
lichkeiten für die Itommando- 
zeile. Ein falsch eingegebener 
Befehl muß bis zum Fehler mit 

< BACKSPACE > gelöscht 

werden. Hatten Sie bereits 

< RETURN > gedrückt, so gibt 
es keine andere Möglichkeit als 
die Zeile neu zu tippen. Bei Ko¬ 
pierbefehlen oder Compilerauf¬ 
rufen mit langen Optionslisten 
kann dies sehr ärgerlich wer¬ 
den. Mit Ex-CLI haben Sie Mög¬ 
lichkeiten, die l^mmandozeile 
zu editieren: 

< BACKSPACE > hat die 
gleiche Funktion wie im CLI, es 
löscht das Zeichen links vom 
Cursor. 

< DEL > löscht das Zeichen 
unter dem Cursor. 

<CRSR-lmks> bewegt den 
Cursor ein Zeichen nach links. 


< CRSR-rechts > bewegt 
den Cursor ein Zeichen nach 
rechts. 

<SHIFT CRSR-Ilnks> be¬ 
wegt den Cursor an das linke 
Ende der Eingabezeile. 

<SHIFTCRSR-rechts> be¬ 
wegt den Cursor an das rechte 
Ende der Eingabezeile. 

<CRSR-up> fügt ein Zei¬ 
chen an der Cursorposition ein 
(ExCLI arbeitet im Overwrite- 
Modus, daher müssen Sie für 
Zeichen, die eingefügt werden 
sollen, vorher Platz reservie¬ 
ren). 

<CRSR-down> löscht das 
Zeichen unter dem Cursor (glei¬ 
che Funktion wie <DEL>). 

<SHIFT CRSR-up> löscht 
die Eingabezeile rechts von der 
Cursorposition. 

<SHIFT CRSR-down> 
löscht die Eingabezeiie. 

Jeder ausgeführte Befehl 
wird mit der »History<«-Funktion 
zwischengespeichert. Sie kön¬ 
nen jederzeit die letzten zehn 
Befehle mit einem Tastendruck 
wieder auf dem Bildschirm er¬ 
scheinen lassen, eventuell edi¬ 
tieren und erneut ausführen. 

Der zuletzt ausgeführte Be¬ 
fehl liegt immer auf <F10>, 
sobald ein neuer Befehl auf 
<F10> liegt, wird die gesamte 
History um eine Funktionstaste 
nach links »kopiert«. Der »älte¬ 
ste« Befehl fällt dabei heraus. 
Um sich die Wirkungsweise 
dieser History-Funktion zu ver¬ 
deutlichen, lassen Sie einige 
Befehle ausführen. Drücken 
Sie nach jedem Befehl auf 
<HELP>. Sie erhalten jedes¬ 
mal die aktuelle Belegung. 

Eine besondere Funktion hat 
die Taste <TAB>. Mit ihr wird 
der Schreibmaschinenmodus 
eingeleitet. Sie können jetzt 
eine beliebige Zeile editieren. 
Sobald Sie < RETURN > 
drücken, wird diese an den 
Drucker geschickt. Sie können 
bei ExCLI bis zu 80 Zeichen pro 
Zeile editieren. Kurz vor diesem 
Limit werden Sie durch einen 
Bildschirmblitz bei jedem Ta¬ 
stendruck gewarnt. 

Mit ExCLI können Sie bis zu 
95 Tasten mit eigenen Short- 
cuts belegen. Sie legen eine 
beliebige Zeichenfolge (bis zu 
einer Länge von 80 Zeichen) 
auf eine einzige Taste. Dazu 
schreiben Sie die gewünschte 
Zeichenfolge in die Eingabezei¬ 
le, drücken aber nicht <RE- 
TÜRN>, sondern zweimal 
< ESC >. Jetzt drücken Sie ei¬ 
ne beliebige Taste, mit der Sie 
diese Zeichenfolge abrufbar 
machen wollen. 

Das Abrufen funktioniert auf 
ähnliche Weise: Drücken Sie 
einmal < ESC >. Geben Sie ei¬ 
ne beliebige Taste ein. Wenn 


diese belegt war, wird der zuge¬ 
hörige Befehl ausgeführt. 

Sie können die Tasten mit 
den ASCII-Codes von 32 bis 
126 für Shortcuts benutzen. 
Diese umfassen alle Buchsta¬ 
ben, Ziffern und Sonderzei¬ 
chen. 

Vermutlich wollen Sie nicht 
bei jedem Start von ExCLI alle 
Shortcuts neu definieren. Mit 
dem »save«-Befehl speichern 
Sie die Belegung. Dafür wird 
das File »ExCLI.key« im aktuel¬ 
len Verzeichnis verwendet. 
Wenn Sie in ein anderes Ver¬ 
zeichnis schreiben wollen, ge¬ 
ben Sie dieses als Parameter 
an. 

Sie beenden ExCLI mit dem 
Befehl »exit« oder mit der Ta¬ 
stenkombination <CTRL d>. 
Dies sollten Sie erledigen, be¬ 
vor Sie mit »endcli« das CLI 
beenden, da sonst Ihr CLI »ar¬ 
beitsunfähig« wird: Es erhält 
den Befehl zum Beenden, hat 
aber noch einen Task gestartet, 
der nicht beendet ist (ExCLI). 
Der Amiga wartet auf das Been¬ 
den dieses Tasks, bevor er das 


Kommando ausführt. Gleich¬ 
zeitig wartet der Task auf die 
Ausführung des Kommandos 
bevor er sich verabschiedet - 
ein eindrucksvolles Demo der 
Multitasking-Schwierigkeiten. 

Erweiterungen 

ExCLI ist eine komfortable 
Oberfläche für das CLI. Sicher 
treffen die gebotenen Möglich¬ 
keiten nicht jedermanns 
Geschmack. Wenn Sie das Li- 
sting studieren, sollten Sie in 
der Lage sein, eigene Erweite¬ 
rungen anzubringen. Mausfans 
möchten vielleicht Menüs und 
Gadgets einrichten. Hierfür fin¬ 
den Sie eine Anregung im C- 
Kurs auf Seite 61. Wenn Sie die 
Cursortasten mit anderen 
Funktionen belegen wollen, 
sollten Sie die Zeilen 545 bis 
592 im Listing aufmerksam le¬ 
sen. Natürlich ist es auch mög¬ 
lich, die Funktionstasten fest zu 
belegen, in Zeile 393 bis 402 
finden Sie dazu Informationen. 

In jedem Fall erleichtern Sie 
sich mit ExCLI enorm die Arbeit 
mit dem CLI. (Arno Gölzer/so) 


Programmname: 

ExCLI 

Computer; 

A500, A1000, A2000 mit Kickstart 1.2 

Sprache: 

C 

Compiler: 

Aztec 

Aufrufe: 

1- 

siehe Text 


Programmautor: Arno Gölaer 


1 ALO #lnclude <stdio.h> 

2 RC #include <sgtty.h> 

3 lo #inolude <llbraries/do8.h> 

4 m3 /* Maximale Anzahl Zeichen pro Zeile; Anzahl der ExCLI-Befe 

hie »/ 

5 II #deflne MAXC 80 

6 Hh #deflne KOK 14 

7 bO /* Festlegen der globalen Variablen */ 

8 BV FILE «tastatur, *flle, »drucken; 

9 rL int dir(),ed(),del(),nidir(),help{),cls(),ren(); /»ei 

gene KOMmandos */ 

10 76 Int ende(),vlew(),type(),3ave(),new(),pfad{); 

11 TD int maschinesO; 

12 S1 int flag»0; 

13 LM int p»-l; 

14 Kh int z=-l; 

13 gQ unslgned char aktuellDir[200]; 

16 Qc unslgned char store[200]; 

17 pn unslgned char zelle[MAXC+1]; 

18 hD unslgned char koininando[MAXC+13; 

19 bE unslgned char parameter[MAXC+l]; 

20 Rp unslgned char obef[HAXC+7]; 

21 65 unslgned char e8c[96][HAXC+l]; 

22 5p unslgned char fta8te[10][HAXC+l]; 

23 rL unslgned char par[2][MAXC+1]; 

24 05 /• Befehlsworte »/ 

25 IN unslgned char bef[KOK][10]=[ 

26 gN3 "dir', 

27 Sv 'cd*, 

28 yV "del", 

29 7b "mdir", 

30 Ob "help", 

31 aj "cls", 

32 5P "view", 

33 B4 "type", 

34 5f "save", 

35 SK "new", 
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36 Vq 

"pfad", 

37 xk 

”ren', 

38 6u 

'endcli’. 

39 n9 

'exit" 

40 xtO 


41 ql 

/• Funktionsnamen der Befehle */ 

42 IK 

int (*funk[K0M])() = i 

43 fa3 

&dir, 

44 Vy 

&cd, 

45 xl 

&del, 

46 Gm 

&nidlr. 

47 9m 

&help. 

48 yw 

&cls, 

49 Ea 

&viev, 

50 KF 

Stype, 

51 Eq 

&save, 

52 RX 

&new, 

53 el 

&pfad, 

54 tfx 

Iren, 

55 OJ 

&ende, 

56 dk 

Scende 

57 EAO 

!; 

58 En 

struct sgttyb stty; 

59 aU 

struct FlleLock *verz; 

60 Ob 

struct FllelnfoBlock "elntrag; 

61 Ib 

/» «/ 

62 z6 

/» Funktionen */ 

63 Ph 

/» V 

64 Zo 

ren() 

65 sB 

/» Unbennen eines Eintrags - Dos-Funktion Rename() »/ 

66 OT 

1 

67 903 

Int 1-0; 

68 GR 

int J=0; 

69 NU 

Int k-O; 

70 3B 

char c; 

71 VI 

lf(parameter[0]-='\0')l 

72 Cv6 

prlntfC'Aufruf: ren ALTER_NAME NEUER_NAME\n')} 

73 CI 

returnj 

74 Ch3 

) 

75 Ib 

whlle(((c*parameter[l]) 1=0) (j<2))( 

76 LZ6 

lf(c..' ')! 

77 HC9 

lf(kl=0)( 

78 vjC 

par[J][k]-'\0'; 

79 Bz 

lf(8trcmp{8!par[j],'to')l=0) J++; 

80 Kb 

k»0; 

81 Jo9 

1 

62 64 

i++; 

83 St 

contlnue; 

84 )>lr6 

) 

85 Am 

par|;jj[k]=c; 

86 E£ 

k++; 

87 B9 

1++; 

88 Qv3 

1 

89 6u 

par[j][kj='\0'; 

90 Fx 


91 VE6 

prlntfC'Aufruf: ren ALTER_NAME NEUERJJAMEXn'); 

92 V4 

retum; 

93 V03 

i 

94 gP 

lf(!Rename(par[0],par[l])) printf('Kann nicht ts als {a 
umbenennen!\n',par[0],par[ll)i 

95 Fl 

eise prlntf(')Js heißt Jetzt !{sI\n',parCO],par[l]); 

96 Y30 

] 

97 HT 

pfadO 

98 Wz 

1 

99 5n3 

if(aktuellDir[0]=='\0') prirtf{'Erst mit 'cd NAME' wird 
ein aktueller Pfad angelegt!'); 

100 kx 

prlntf('<s\naktuellDlr); 

101 d80 

] 

102 dx 

new() 

103 05 

/» löschen der Tastaturbelegung »/ 

104 c5 

( 

105 Bh3 

int 1; 

106 Px 

for(l=0ji<95;l-H-) e8Cti][0] = '\0'i 

107 FG 

prlntf("Tastenbelegung gelöscht!\n'); 

108 kFO 

} 

109 Nb 

raw_on() 

110 oe 

/* ExCLI Übernimmt die Kontrolle Ober die Tastatur */ 

111 jC 

I 

112 YF3 

ioctl(0,TI0CGETP,istty)j /» console-Parameter holen »/ 

113 E3 

stty.sg_flags 1= RAW; /» Parameter erweitern */ 

114 rx 

ioctl(0,TI0CSETP,&stty); /* console-Parameter setzen * 

/ 

) 

115 rMO 

116 t7 

raw_off() 

117 3b 

/• Amlga kontrolliert die Tastatur */ 


118 qJ 1 



119 Ng3 

loctl(0,TI0CGETP,6stty)5 


120 IF 

atty.sg_flag8 = RAW; 


121 Bg 

ioctl(0,TI0CSETP,&stty); 


122 yTO } 



123 OD endeO 


124 Da /» 

Programmende */ 


125 xQ [ 



126 3Z3 

printf( '\n\n'); 


127 Xu 

flag=0; 


128 EX 

run(*RAH:C/as8lgn C: SYS:c.'); 


129 mP 

run('del RAMrC/asslgn'}; 


130 tA 

run('del RAM:C/run'); 


131 yp 

run('del RAH:C'); 


132 IF 

raw_off (); 


133 17 

Close(tastatur); 


134 df 

if(ma3chlne) Close(drucker}; 


135 cO 

exit(O); 


136 ChO 1 



137 DJ saveO 


138 XF /* 

Tastaturbelegung speichern */ 


139 Be ( 



140 kG3 

int i; 


I4l rC 

if{parameter[ 031 «’\ 0 ') 


142 JJ6 

lf{parameter[8trlen(paraineter)-l] I-':') atrcat(parame 


ter,7'>; 


143 Lr3 

strcat(Parameter,'ExCLI.key'); 


144 xH 

lf(l(file-Open(parameter,HODEJJEWPILE)))[ /» File 

öffnen 


«/ 


145 Mb6 

printf('Kann Tasten nicht speichernXn'); 


146 Nu 

retum; 


147 N83 

) 


148 3f 

for( 1=0;i<95; i++) Wrlte(fIle,esc[ 1],80); 


149 RB 

Cl 08 e(flle); 


150 QvO ) 



151 F4 typeO 


152 15 /• ähnlich dem CLI-Komando 'type' »/ 


153 Pa ( 



154 xJ3 

unsigned char c; 


155 5Y 

char Dblock[5123; 


156 ap 

int i-O; 


157 8z6 

Int blocklaenge, zaehler; 


158 uA3 

lf{parameter[0]*='\0')| 


159 Vd6 

prlntf('Aufruf: type FILE\n'); 


160 bA 

retum; 


161 b63 

j 


162 Nx 

If(l(flle-Open(parameter,MODE_OLDFILE)))1 


163 Sx6 

prlntf('Kann File nicht öffnenlNn'); 


164 fE 

retum; 


165 fA3 

) 


166 Ct 

olsO; 


167 3t8 

do ( 


168 AJ6 

blocklaenge > Read(file, Dblock, 512);/* Block 

lesen 


V 


169 fj 

for (zaehler > 0; zaehler < blocklaenge; zaehler++) 

170 Yx9 

lf(DblockCaaehler] == '\n’){ 


171 NEC 

putchar(Dblock[zaehler]);/» RETURN erlaubt »/ 

172 YW 

i++; 


173 Wü 

lf(i>19)l 


174 mTE 

1=0; 


175 r9 

prlntf('\n\033t2mTASTE - weiter 1 ESC 

- 8top\ 


033C0m\n'); 


176 dl 

raw_on{); 


177 X7 

lf((c-getchar())==27){ 


178 UdF 

blocklaenge=0; 


179 WO 

raw_off(); 


180 py 

break; 


181 vQE 

j 


182 U 

eise clsO; 


183 a4 

raw_off(); 


184 yTC 

j 


185 zU9 

j 


186 Pq 

eise if(Dblock[zaehler] >= 0x20) /* < 

32 ve 


rboten »/ 


187 roC 

putchar(Dblock[zaehler]); 


188 2X6 

1 


189 0W3 

) whlle (blocklaenge — 512);/* ein ganzer Block 

wurde g 


elesen */ 


190 vg 

Close(flle); /* File schllessen »/ 


191 8H 

putchar('\n'); 


192 6b0 ) 
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193 xf 

vlew() 

194 10 

/» Tastaturbelegung einer einzelnen Taste anzelgen »/ 

195 5Y 

: 

196 DJ 3 

Int nr; 

197 Xn 

If(Parameter[0]=='\0') [ 

198 5w9 

printfC'Aufruf: view TASTEXn'); 

199 En 

retum; 

200 Ej3 

j 

201 UZ 

lf(paraineter[0]>=32 && paraiiieter[0] <=126)( 

202 g56 

nrsparaoeter[0]-32 j 

203 o8 

if (esc [nr] [0]! = '\0') prlntf ('<s\n', esc [nr]); 

204 sG 

eise prlntf('Nicht belegtlXn'); 

205 Jo3 

1 

206 61 

eise prlntf("Taste nicht frei deflnierbariXn'); 

207 LqO 

) 

206 Wz 

mdlr() 

209 dZ 

/» makedir-Kommando - Dos-Funktlon CreatDlrO */ 

210 Kn 

( 

211 113 

if(Parameter[0]=='XO') { 

212 8C6 

prlntf ('Aufruf: mdlr VERZEICHNISNAMEXn'); 

213 S1 

return} 

214 Sx3 

j 

215 fS 

lf((verz*CreateDir(parameter))==0)( /* CreatDlr - Dir an 
legen »/ 

216 rr5 

if(fleg) 

217 y57 

prlntf( "Verzeichnis 'Its' konnte nicht angelegt werde 
nlXn*, Parameter) j 

218 W13 

1 

219 A5 

else| 

220 106 

UnLock(verz); /» freigeben der Lockstructur */ 

221 eO 

If(flag) prlntf('Verzeichnis ’<s' angelegtlXn',parame 
ter); 

222 a53 

) 

223 b60 

i 

224 zr 

deiO 

225 US 

/» File löschen - Dos-Funktlon DeleteFlle() »/ 

226 a3 


227 1H3 

lf(parameter[0]««'\0')( 

226 VC6 

prlntf('Aufruf: del FILENAMEXn'); 

229 IH 

return; 

230 iD3 

] 

231 XY 

if(DeleteFile(parameter)**0)( 

232 776 

If(flag) 

233 rJ8 

prlntf('Eintrag %8 konnte nicht gelöscht werdeniXn' 
»Parameter); 

234 mH3 

1 

235 zj 

eise If(flag) prlntf('Eintrag Xs gelöschtlXn',Parameter) 

236 oJO 

! 

237 MV 

dir() 

238 nX 

/» Einträge eines Verzeichnisses listen »/ 

239 nO 

( 

240 Hs3 

int 1; 

241 97 

/* Speicher fCr FllelnfoBlock schaffen */ 

242 es 

eintrag » (struct FllelnfoBlock *) AllocHeni(slzeof{Btruc 
t FllelnfoBlock),0); 

243 K9 

lf(paranieter[0]=='\0’) strcpy(störe,aktuellDlr); 

244 so 

eise stropy(store,Parameter); 

245 Eo7 

lf((verz*LockUtore, ACCESS_READ))«=0)I 

246 086 

prlntf('Finde Directory te niehtlXn',störe); 

247 8T 

return; /» nicht gefunden »/ 

248 0V3 

) 

249 9B 

if(Examlne(verz,elntrag)!»0)[ 

250 0A6 

if(elntrag->flb_DirEntryType<«0)(/» File oder Verze 
Ichnis ? »/ 

251 8R9 

prlntf('lts Ist kein VerzeichnislXn',störe); 

252 5e 

return; 

253 5a6 

) 

254 6b3 

) 

255 93 

eise prlntf("Kann %s nicht listen!störe); 

256 tiN 

prlntf('\n\033[4inEinträge von Js:X033COraXn\n',eintrag-> 
fib_FileName); 

257 Vi 

ExNext(verz,elntrag); 

258 9J 

while ÜoErrO 1= ERR0R_N0_M0RE_ENTRIES)1 /» Dir-Elntrfig 
e lesen */ 

259 WL6 

If (eintrag->fib_DlrEntryType > 0){ /* Dlrectoryna 

me */ 

260 JD9 

printf('X033[2mUsXnX033[0ra'»eintrag->fib_FlleNane 

261 Die 

J 

262 33 

else( /* Filename »/ 

263 0P9 

prlntf('Js XrXt\tXtXt(;<ld)Xn',eintrag->fib_FlleNa 
me,eintrag-> flb_Slze); 

264 Gl€ 

I 

265 tv 

ExNext(verz,eintrag); /* nächster Eintrag »/ 


266 In3 

I 

267 PV 

FreeKem(elntrag,sizeof(8truct FllelnfoBlock)); /• Speich 
er freigeben »/ 

268 Rn 

UnLock(verz); 

269 LqO 

i 

270 3V 

cd() 

271 In 

/» festlegen einer neuen aktuellen Directory - Dos-Funktlon 
CurrentDlrO */ 

272 Kn 

i 

273 tP3 

int 1; 

274 WB 

int bad»0; 

275 Hr 

strepy(store,aktuellDlr); /* 'Sicherheitskopie' */ 

276 d3 

elntrag=(8truct FllelnfoBlock »)AllocHera(sizeof(8truct F 
ileInfoBlock),0); 

277 V4 

if(parameter[0]=='X0')l /» nur cd »/ 

278 L88 

verzBLock(aktuellDir, ACC£SS_R£AD) ; 

279 0m3 

Examine(verz,eintrag); 

280 uy 

prlntf('<s\n'.eintrag-> flb^FlleName); 

281 X2 

) 

282 B6 

else[ 

283 n 

if (paraiaeter[0]=»V') { /* aufsteigen mit 'cd /' */ 

284 IH5 

for (l»8trlen(aktuellDlr);aktuellDir[i]! ■'/' fc&aktuellD 
ir[l]l-':';i— ); 

285 XL 

if(aktuellDir[i] «« *:') 1++; 

286 no 

aktuellDir[i] = '\0'; 

287 d83 

1- 

288 AL 

eise ( /* neue Directory »/ 

289 ih5 

lf((index(parameter, ':' ))=«0)( /* kein enthalten * 

/ 

lf(aktuellDir[strlen(aktuellDlr)-l] I» ';')j/'»kein 
e Rootdir */ 

290 C88 

291 Re9 

8trcat(aktuellDlr, '/') 

292 1D6 

) 

293 j4 

strcat(aktuellDlr, parameter); /* neues Verzeichnis a 
nhängen »/ 

294 kF5 

i 

295 Ne 

eise 8tropy(aktuellDlr, parameter); /» parameter enthä 

It ':' »/ 

296 mH3 

1 

297 FA8 

if((verz » Lock(aktuellDlr, ACCESS_READ) ) !• 0)( 

298 wy6 

if(Examlne(verz,eintrag)I>0)( 

299 Yq9 

if(elntrag->fib_DlrEntryType<»0) bad-t-+; 

300 kZ 

eise verz«CurrentDir(verz); /» neues Verzeichnis a 
nraelden */ 

301 rH6 

) 

302 B5 

eise bad-H-; 

303 t08 

1 

304 713 

eise bad -h*; 

305 Ee 

If(bad) 1 /* Das neue Verzeichnis existiert nicht! */ 

306 r46 

prlntf('Flnde Verzeichnis Xs nichtlXn',parameter); 

307 A5 

strcpy(aktuellDir,Store);/» RÜckkopleren der Sicherhe 
Itskople »/ 

308 yT8 

1 

309 dJ3 

1 /* eise »/ 

310 7T 

UnLock(verz); 

311 TD 

FreeHe(n(eintrag,8izeof(struct FllelnfoBlock)); /« Speich 
er freigeben »/ 

312 2X0 

) 

313 TD 

_abort() 

314 AK 

/» Prompt 0 schreiben. Der Namen _abort bewirkt, daß die 
Tastenkomblnation 

315 4n3 

CTRL-C nicht mehr zum Programmabbruch führt. 

»/ 

316 2V0 

( 

317 VQ3 

P'-i; 

318 Gv 

z=-l; 

319 JT 

prlntf('X033[33ni X033[3lra'); 

320 AfO 

1 

321 Gg 

helpO 

322 bc 

/» Hllfsseite listen »/ 

323 9c 

i 

324 1E3 

int 1; 

325 JQ 

prlntf(’XfX033[4mBefehle von ExCLI:XO33[0m\nXn'); 

326 Bp 

prlntf('dir - Verzeichnis listen cd - Arbeitsve 

rzalchnis festlegenXn'); 

327 SV 

printf('del - File löschen mdlr - Verzeichn 

Is anlegenXn'); 

328 41 

printf{'type - Flle als Text listen help - Hllfsselt 

e listenXn'); 

329 Se 

prlntf('cls - Bllschirm löschen view - Tastenbel 

egung prOfenXn'); 

330 kZ 

prlntf('new - Tastenbelegung löschen pfad - komplette 
r Pfadname listenXn'); 

331 n7 

printf('ren - Eintrag umbenennen exlt - ExCLI bee 

ndenXn'); 
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487 rM9 

488 Vx 

] 

case '\r':(/» wagenrOcklauf=<RETURN> */ 

489 yRC 

printf ('\n'); 

490 ET 

Z-H-; 

491 D9 

if(inaschine){ 

492 FwF 

zelle[z]='\n'; 

493 wA 

zeile[z+l]»'\0'; 

494 v3 

If (Wrlte{drucker, zelle, 8trlen(zelle)) <1) 

495 Pol 

printf("XriDrucker elnschalten!\n')j 

496 oJF 

P=-l; 

497 9o 

z»-!; 

498 x6 

499 3Y0 

break; 

] 

500 N4 

zeile[z]='\0'; 

501 nc 

lf(z>0) ( 

502 DyF 

run(zelle); 

503 7cC 

] 

504 Ju 

_abort(); 

505 4D 

506 Af9 

break; 

] 

507 E7 

case 27:(/» ESC •/ 

508 3xC 

printf{'\033[33Di\233A\r\233K 'ESC - Taste bei 
egen '); 

509 Mr 

printf ('oder 'Taste' - Konuaando starten\033[31iii 
\233B\r\233C\233C'); 

510 tx 

c=getchar(); 

511 Xa 

lf(c==27)[ 

512 qRF 

prlntf('\033[33m\233A\r\233K 'Taste' - Konus 
ando spelchem\033 [31ni\233B\r\233C\233C '); 

513 WO 

c»getchar(); 

514 Pc 

lf(o>»32 W c<»126){ 

515 Ysl 

nr=c-32; 

516 Nf 

if{z>=0)( 

517 oHL 

atrcpy(esc[nr],zelle); 

518 4vl 

519 Ns 

printf('\nESC-')Jc' gespeichertI\n',o); 

) 

520 S2 

eise printfCKeine Kommandozeile?\n'); 

521 PuF 

522 YB 

i 

eise printf('Taste kann nicht belegt werden! 
\n'); 

523 RwC 

524 50 

] 

else[ 

525 anF 

if(c>«32 && c<»126)( 

526 j3I 

nr=c-32; 

527 xV 

lf(e8c[nr][0]!='\0')[ 

528 zXL 

printf ('!{s\n',e80[nr]); 

529 kH 

run(e8c[nrl); 

530 Y3I 

531 9X 

j 

eise printf("Nicht belegtiNn'); 

532 a5F 

1 

533 JM 

eise printf('Taste kann nicht belegt werden! 
\n'); 

534 c7C 

535 EP 

1 

_abort(); 

536 ZI 

break; 

537 fA9 

] 

538 7J 

case 127:[ /* del-taste */ 

539 gHC 

lf((z>=0) && (p<z))[ 

540 REF 

printf ( '\233C'); 

54l gn 

c_del(); 

542 kFC 

) 

543 gp 

544 niH9 

break; 

) 

545 kZ 

case 155:(/» CSI »/ 

546 TXC 

c=getchar(); 

547 aw 

lf(c>*'0' &4 c< = '9' II c==’?')( 

548 pZF 

oheckkey(c); 

549 r«C 

) 

550 VQ 

elsel 

551 MOF 

if(ca='A') insertO;/* C up »/ 

552 Tm 

if((c»*'B') && (z>=0) && (p<z))[/« C down 
•/ 

553 eRI 

printf("\233C'}; 

554 tO 

c_del(); 

555 xSF 

556 wn 

i 

if(o=='D’ && p>«0)[/» C left */ 

557 u9I 

printf("\b'); 

558 EN 

p—; 

559 IWF 

I 

560 eK 

if(c*='C' && p<z)(/* C right */ 

561 mZI 

printf ( '\233C'); 

562 49 

563 5aF 

P++; 

] 

564 qy 

if(c=='S')[/» C shift down »/ 


565 wol 

566 15L 

567 rzl 

568 yT 

569 Jy 

570 vQ 

571 DiF 

572 TG 

573 4wl 

574 IGL 

575 91I 

576 wa 

577 7c 

578 JX 

579 tu 

580 MrF 

581 Ul 

582 371 

583 FF 

584 YW 

585 Rw 

586 79 

587 12 

588 Uz 

589 VOF 

590 Wie 

591 Sb 

592 Y39 

593 IBS 

594 OKC 

595 vZ 

596 o7 

597 0N9 

598 18C 

599 ic 

600 gl 

601 gY 

602 Ev 

603 ilMF 

604 3Y 

605 yr 

606 mHC 

607 QL 

608 hfF 

609 30 

610 qLC 

611 mv 

612 sK9 

613 h76 

614 tfl3 

615 vQO ) 
(C) 1988 

Listing 


lf(p>=MAXC-6) 

printf( '\r\233K\233A\233C\233C\233K '); 
eise printf( '\233B\r\233K\233A\233C\233C\ 
233K')j 
p=-l; 
z=-l; 

zelle[0]='\0'j 

i 

if(c=='T')(/* C shift up »/ 
if(p>=:MAXC-6) 

printf{ '\233K\233A\r\233C\233C ')j 
eise printf ( '\233iC\233B\r\233K\233A\233C\ 
2330'); 
z=p; 

P-l; 

zelle[z+l]='\0'; 
for(;p<z;p++) printf('\2330'); 

! 

if(c«' ')( 
c=getchar(); 

if(c»='A')(/» 0 shift left »/ 
for(;p>»Ojp--) prlntfCXb'); 

) 

lf(c»«’@')(/* 0 shift right */ 
for(;p<z;p++) prlntf('\233C'); 


oaae 255:1/* OTRL-d und Neuaufruf •/ 
prlntf('exlt*); 
ende(); 

1 

default:(/* Koiraiandozeile aufbauen »/ 

/* z=Länge der Zella; p»Cursorpo8itlon darin */ 

lf(z«»p) Z++; 

p*+; 

lf((p..z) && (z>MAXC-6)) putchar(7); 
lf(z<MAXC)l 
zelleCp] s c; 
zelle[z+l]« '\0’; 
putchar(e); 

I 

elsel 

lf(p=»z) z—; 
p—; 


I /» switch */ 
1 /* whlle »/ 

M8.T 

2. (Schluß) 


Programmname: ExCLI.bat 


Computer: A500, A1000. A2000 mit Kickstart 1.2 


Sprache: C 


Compiler: Aztec 


Aufrufe: 


Programraautor; Amo GBlzer 


1 PjO ; Gölzy's ExCLI BATCHFILE 

2 qO ; 

3 BI2 makedlr RAM:C 

4 HB copy SYS:C/copy RAM:C 

5 kD copy SYS:C/lnfo RAM:C 

6 TO copy SYS:C/li8t RAHrC 

7 OE copy SYS:C/execute RAM:G 

8 JWO ; usw ... 

9 10 ; ExCLI aufrufen 

10 Is2 path SYS:C 

11 P3 ExCLI 
(0) 1988 M&T 

Listing 2. »ExCLI.bat« ist ein Beispiel für eine Batchdatei 
zum Aufruf dieses Tools 
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OOLS 


Ottlfttt 


LiiOt nu 


Cotfile All 

C«vile Om 

Liak Files 

im Liidt-File 


Uii Fili 


Prinl File 


Add tolisi 


tm M\ 


Assixe 


iMd List 


i lk\ 


Fukip 


Edit: 


F^int 


Exeeute 


Set late 


Fpefepenees 


Bild 1. Mit »LCT« bedienen Sie Ihren Compiler ausschließlich über Gadgets 


Der Lattice-C-Compiler galt lange M 
als gutes Beispiel für schlechten 1 
Ton - zumindest in der 
Benutzerfreundlichkeit. Mit unserem 
Utility gehören diese Gerüchte 
endgültig der Vergangenheit an. 


A m Anfang war... nein, 
nicht was Sie denken! 
Gemeint ist der Anfang 
des Amiga. Und da war Lattice. 
Ein toller C-Compiler - aber mit 
anstrengender Bedienung. Die 
ellenlangen Funktionsaufrufe 
haben so manchem Program¬ 
mierer ein Stück Nervenkraft 
abgefordert. Dieser Streß hat 
ein Ende - jetzt gibt es »LCT«. 

Mit LCT wird die Bedienung 
des Lattice-C-Compilers radikal 
vereinfacht. War früher ein 
Compiler-Aufruf oder die Nut¬ 
zung der vielfältigen Zusatz¬ 
funktionen den Fingerübungen 
eines Pianisten gleichzuset¬ 
zen, so genügen jetzt wenige 
Mausklicks. Und durch die vor¬ 


bildliche Kommentierung des 
Quellcodes sind Anpassungen 
an die eigenen Bedürfnisse 
leicht durchführbar. 

Das Listing von LCT hätte ge¬ 
druckt 13 Seiten in Anspruch 
genommen. Aufgrund der Län¬ 
ge haben wir uns entschlossen, 
LCT nur auf Diskette anzubie¬ 
ten. Sie erhalten die Pro- 
gramm-Service-Diskette mit 
dem Bestellschein auf Seite 34. 

Kopieren Sie das File »LCT« 
in das C-Directory Ihrer Lattice- 
Systemdiskette und Ihre Leiden 
haben ein Ende. Mit 


LCT [Editor [WProzessor 
[Programm [CLI]]]] 


Complieren 
käla carte 
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starten Sie Ihre neue Benutzer¬ 
oberfläche. Sollte sich im Na¬ 
men eines der Parameter ein 
Leerzeichen befinden, so müs¬ 
sen Sie diesen in Anführungs¬ 
zeichen übergeben. Alle Para¬ 
meter sind optional. Sie müs¬ 
sen - wenn sie angegeben sind 

- in der oben genannten Rei¬ 
henfolge stehen. Weil das Leer¬ 
zeichen als Trennzeichen zwi¬ 
schen den Parametern dient, ist 
es zwar möglich, nur die Para¬ 
meter für Editor und WProzes- 
sor (siehe unten) zu übergeben; 
WProzessor und CU würden 
dagegen nicht erkannt. »LCT ?« 
gibt Ihnen jederzeit die korrekte 
Syntax aus. 

Die Parameter von LCT er¬ 
möglichen Ihnen das Integrie¬ 
ren beliebiger Programme in 
diese Benutzeroberfläche. Da¬ 
bei sollten Sie sich an folgende 
Itonventionen halten: 

Parameter 
sorgen für 
Flexibilität 

Editor ist der Name des Edi¬ 
tors, auf den die Befehle »Edit 
File«, »Edit Link-File« und »Edit« 
zugreifen sollen. Geeignet ist 
jeder Editor, der beim Aufruf 
den Namen eines zu bearbei¬ 
tenden Files akzeptiert. Wird 
kein Parameter angegeben, 
verwendet LCT den »Ed« aus 
dem C-Directory. 

WProzessor gibt ein Textver¬ 
arbeitungsprogramm an, das 
von dem Gadget »Word Proces¬ 
sor« aktiviert werden soll. Auch 
hier kann jedes Programrn ver¬ 
wendet werden, das die Über¬ 
gabe des zu bearbeitenden 
Files als Argument erlaubt. Vor¬ 
eingestellt ist »Notepad«. 

Programm ist ein beliebiges 
Programm, das von LCT per 
Gadget aufgerufen werden soll. 
In diesem Gadget wird auch der 
übergebene Programmname 
eingetragen. Fehlt dieser Para¬ 
meter beim Aufruf, so wird »Pre- 
ferences« eingetragen. 

CU steht für den Namen des 
Befehls, mit dem LCT einen 
neuen Task startet. Es kann je¬ 
des Programm aufgerufen wer¬ 
den, das keine Parameter be¬ 
nötigt, oder immer die gleichen 

- die beim Aufruf von LCT mit 
dem Namen übergebenen. Im 
Gadget steht allerdings immer 
»CLI«. Wird hier kein Parameter 
angegeben, ruft das CLI-Gad- 
get den Befehl »NEWCLI CON: 
0/176/640/90/CLI« auf. 

Ein Aufruf von LCT könnte 
beispielsweise so aussehen: 

LCT ed Beckertext df2: 
Kermit "NEWCLI NEWCON: 
10/10/100/100/SHELL" 
oder 


LCT dfltSuperEd dhO; 
Utilities/MyTexter 

Die voreingestellten Parame¬ 
ter sind in »Mylncludes.h« defi¬ 
niert. Der Name für den Editor 
steht in der Itonstanten »Editor 
[101]« und für die Textverarbei¬ 
tung in »WProcessor(101]«. 
»Pref[101]« gibt den Namen des 
Programms an, und CLI ist in 
»CLIName(101]« definiert. 

Sie können LCT eine eigene 
»Assign-Liste« abarbeiten las¬ 
sen. Diese wird automatisch im 
File »LCT-ASSIGN« gesucht. Ist 
dieses File nicht im aktuellen 
Directory, so werden alle 
Assign-Definitionen aus den 
zuletzt eingestellten Werten 
(beispielsweise von der Start- 
up-Sequence) übernommen. 

Eine Startup-Sequence für 
den LCT finden Sie in Bild 2. 
Diese verwendet die gleichen 
Definitionen, die bei LCT vor¬ 
eingestellt sind. Beachten Sie 
bitte, daß diese Voreinstellun¬ 
gen nicht automatisch durchge- 
führt werden, sondern beim An¬ 
klicken des »Assign«-Gadgets. 
Die Voreinstellungen für den 
Assign-Befehl lauten: 

INCLUDE: Lattice 
_C_4.0.2:CompactH 
LC: C; 

LIB: Lattice 
_C_4.0.2:lib: 

QUAD: RAM: 

Diese Definitionen können 
Sie in »Mylncludes.h« verän¬ 
dern. Sie stehen im Feld 
»As[4][101]« in der genannten 
Reihenfolge. Falls Sie das Pro¬ 
gramm an einen anderen Com¬ 
piler anpassen und andere De¬ 
vices definieren wollen (bei¬ 
spielsweise für die Version 5.0): 
Die Namen finden Sie im Feld 
»Ev[4][9]«. 

In Bild 1 sehen Sie den Bild¬ 
schirmaufbau von LCT. Oben 
befindet sich ein Feld, das zu 
Beginn leer ist. Erst durch das 
Laden einer File-Liste oder Ein¬ 
gabe von File- und Programm¬ 
namen in den entsprechenden 
Gadgets und Anklicken von 
»Add to List« füllt sich der Ka¬ 
sten. Links sind die Filenamen 
und rechts die zugehörigen 
Programmnamen zu sehen. 

Mit Hilfe dieser Liste haben 
Sie immer einen Überblick über 
die Files, aus denen sich ihr 
Programm zusammensetzt. 
Sie können sogar mehrere Pro¬ 
grammprojekte gleichzeitig ver¬ 
walten - es sind 50 Einträge er¬ 
laubt. Mit den beiden Pfeilen 
wird die Liste gescrollt. 

Wenn Sie mit der Maus ein 
File anklicken, erscheint es im 
Gadget »File:« und der entspre¬ 
chende Programmname im 
Gadget »Program:«. 


Neben dem Eingabefeld 
»File« werden die Compiler- 
und Assembler-Anweisungen 
angezeigt, die für dieses File 
definiert wurden. Änderungen 
der Anweisungen, die Sie in 
diesem Gadget vornehmen, 
werden in die Programmliste 
übernommen: Änderungen im 
File- oder Programm-Gadget 
(Mauszeiger ins Gadget - an¬ 
klicken - Eintrag ändern - 
< RETURN > drücken) werden 
erst dann aktualisiert, wenn Sie 
das Feld »Add to List« an¬ 
klicken. 

C-Source-Files müssen mit 
».c« enden. Bei jeder anderen 
Endung vermutet LCT ein As¬ 
sembler-File. 

Im Gadget »Link File:« tragen 
Sie den Namen jenes Files ein, 
in dem sich die Parameter für 
den BLink befinden. Der Name 
dieses Files ist unabhängig 
vom Programmnamen. Wenn 
das angegebene Link-File noch 
nicht vorhanden ist, wird der 
Editor aufgerufen und Sie kön¬ 
nen das benötigte File zusam¬ 
menstellen. 

Menü aus 
Gadgets 

LCT lenkt alle Ausgaben des 
Lattice in ein File namens 
»LCT.output« um. Nach An¬ 
klicken des Gadgets »Output« 
wird dieses File angezeigt. Ist 
der Inhalt des Files größer als 
eine Bildschirmseite, so stoppt 
die Ausgabe. Mit der linken 
Maustaste wird die Ausgabe 
fortgesetzt, mit der rechten ab¬ 
gebrochen. »LCT.output« befin¬ 
det sich immer im aktuellen Di¬ 
rectory und wird von der »Out- 
put«-Funktion auch nur dort ge¬ 
sucht. Wurde das aktuelle Di¬ 
rectory gewechselt, müssen 
Sie statt »Output« das Gadget 
»Type« verwenden. 

Die Compilerfunktionen und 
die File-Liste werden über den 
Gadget-Block im mittleren Bild¬ 
schirmbereich gesteuert: 

Complle All compiliert bezie¬ 
hungsweise assembliert alle 
Files, deren Programmname 
der Anzeige in »Program« ent¬ 
spricht. Die Reihenfolge wird 
durch die Fileliste bestimmt. Ob 
ein File ein C-Source- oder ein 
Assemblerfile ist, erkennt LCT 
an der Endung (».c« steht für C, 
alles andere für Assembler). 
Auf Wunsch werden die Files 
vor dem Compilieren ins RAM 
kopiert und nur das Ergebnis- 
File auf Diskette geschrieben. 
Über ein String-Gadget am un¬ 
teren Rand werden die Steuer¬ 
optionen eingegeben, die für 
alle Files verwendet werden. 


Während des Compilierens 
wird das LCT-Fenster geschlos¬ 
sen und die Anzahl der Bitpla¬ 
nes auf Eins gesetzt - das spart 
RAM und Zeit. 

Complle One richtet sich nur 
nach dem Inhalt von »File:« und 
»Program:«. Ob Compiler oder 
Assembler verwendet werden, 
entscheidet sich durch die File- 
Endung. Bevor das Compilie¬ 
ren beginnt, werden Sie auch 
hier gefragt, ob das File ins 
RAM kopiert werden soll. Das 
compilierte File wird dann wie¬ 
der auf die Diskette kopiert. 

Link Files ruft den Linker 
»BLink« auf. Das »WITH«-File 
wird aus dem entsprechenden 
Gadget eingelesen, die Mel¬ 
dungen des Linkers gehen 
nach »LCT.output«. Wenn BLink 
unbekannte Funktionen findet, 
wird dies zwar in »LCT.output« 
vermerkt, aber die Eingabe für 
Ersatznamen entfällt, da BLink 
mit der Option »BATCH« aufge¬ 
rufen wird. 

Edit Link-File und Edit File 
helfen beim bequemen Editie¬ 
ren der in den jeweiligen Einga¬ 
befenstern stehenden Files. 

Print File druckt das in »File:« 
eingetragene Programmfile 
wahlweise als ASCII- oder Hex- 
Dump und mit oder ohne Zei¬ 
lennumerierung. LCT verwen¬ 
det dazu den CLI-Befehl »Type«, 
der deshalb im C-Directory vor¬ 
handen sein muß. 

Add to List fügt den Inhalt 
von »File:« und »Program:« an 
die File-Liste an. Wenn das Pro¬ 
grammfile zwar vorher aus der 
Liste ausgewählt, aber der Na¬ 
me geändert wurde, betrachtet 
LCT dies als neues File. Wird in 
»Program:« keine Bezeichnung 
eingetragen, so wird »NoName« 
in die Liste und in dieses Gad¬ 
get eingesetzt. 

Del from List löscht das Pro¬ 
grammfile, das zuvor ange¬ 
klickt wurde, aus der Liste. An¬ 
klicken ist dabei nötig - die di¬ 
rekte Eingabe in das Feld ge¬ 
nügt nicht. 

OMD aktiviert den Lattice- 
Object-Module-Disassembier 
für das in »File:« stehende File. 
Das Ergebnis finden Sie als 
»Filename.lst« im aktuellen Di¬ 
rectory. Das zugehörige Objekt¬ 
file »Filename.o«muß sich dabei 
auf der Diskette im aktuellen Di¬ 
rectory befinden, da es von 
OMD verwendet wird. Die 
OMD-Optionen werden über 
ein Eingabefeld festgelegt, das 
am unteren Rand eingebiendet 
wird. »OMD« ist ein typisches 
Beispiel dafür, wie LCT die Be¬ 
dienung des Lattice verein¬ 
facht. Ein kurzes »KLICK- 
KLICK« ersetzt den Aufruf 
»OMD [listfile] [options] objfile 
[textfilej«. 
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Tools 


1 CHO 

2 NI 

3 yc 

4 xa 

5 T7 

6 CO 

7 Ex 

8 Ip 

9 lu 

10 yX 

11 bK 

12 5K 

13 9Q 

14 7Z 

15 uV 

16 fO 

17 mk 

18 Ba 

19 HP 


; StartUp-Sequence for Lattloe-C-CoDipiler and LCT V2.1 
; (c) 1988 by Frank Langbein 

AddBuffers dfO: 30 ; Buffer für Laufwerk dfO: erhöhen 

path dfO:System add ; Pfad hinzufügen 
i Datum umd Zeit abfragen 
settlme 

date >S:Sy8tem-Date 
; ASSIGN-Definitionen setzen 
copy CiAssign RAM: 
ram:assign QUAD: RAM: 

rarotassign LC: C: 

ramiasslgn INCLÜDE: Lattice_C_4.0.2:CompaotH 
ram:assign LIB: Lattice_C_4.0.2:lib 

delete Rajn:A8Sign 


Lattlce_C_4.0.1:PopCLI 300 

run conman >NIL: -q 

asslgn LOT: SYS:LCT 

Inieren 

stack 15000 

run LCT: 


PopCLI starten 
; Conman starten 
LCT: zum Starten von LCT def 

Stack erhöhen 

LCT als weiteren Task starte 
Zum CLI 


20 ID qult 
(C) 1989 MiT 

Bild 2. Ein Beispiel für eine Startup-Sequence, die alle 
»Assigns« einstellt und LCT startet 


OML startet das gleichnami¬ 
ge Lattice-Programm. Das Re¬ 
sultat finden Sie in »LCT.out- 
put«, das Sie sich mit einem 
Klick auf »Output« auf den Bild¬ 
schirm holen. Die Optionen 
werden aus dem Feld für die 
Programmoptionen (rechts 
oben neben »File:«) übernom¬ 
men. Der Name der Bibliothek 
muß im Feld »Program:« ste¬ 
hen. Über das String-Gadget 
am unteren Rand geben Sie 
die Befehle zur Steuerung von 
OML ein. Vorsicht! Sie sollten 
hierbei nie die Eingabe der Be¬ 
fehle auf »stdin« legen (mit der 
»©«-Option), LCT reagiert hier 
sehr empfindlich und holt den 
Guru zu Hilfe. 

Packer ruft »ICompact« auf. 
Als Eingabefile wird das in »Pro¬ 
gram:« stehende File verwen¬ 
det. Den Namen des Zielfiles 
müssen Sie über das Gadget 
am unteren Rand des Bild¬ 
schirms eingeben, das nach 
dem Anklicken von »Packer« 
eingeblendet wird. Das kom- 
paktierte File kann nicht mehr 
editiert, sondern nur noch vom 
Lattice-C-Compiler gelesen 
werden. 

Copy to RAM: kopiert das Fi¬ 
le im Feld »File;« ins RAM und 
setzt in der File-Liste den Zu¬ 
satz »RAM:«. Es findet jedoch 
kein Überschreiben statt. Wenn 
ein File ins RAM kopiert werden 
soll, dessen Name dort bereits 
existiert, wird der Aufruf zurück¬ 
gewiesen. Sie erhalten dabei 
keine Fehlermeldung. 

Assign erlaubt Ihnen die Ein¬ 
gabe der Parameter für den 
»Assign«-Befehl des CLI über 
ein Eingabefenster. Natürlich 
muß dieser Befehl im C-Ordner 
liegen. Die Voreinstellungen 
wurden bereits zu Beginn die¬ 
ses Artikels beschrieben. 


Ihre Eingaben werden in dem 
File »LCT-Assign« im aktuellen 
Directory' gespeichert. Sie ste¬ 
hen dort in der angegebenen 
Reihenfolge und sind jeweils 
101 Zeichen lang. »LCT-Assign« 
wird von LCT angelegt, wenn es 
noch nicht vorhanden war, an¬ 
sonsten überschrieben. Fehl¬ 
eingaben werden zwar gespei¬ 
chert, aber nicht ausgeführt - 
die alte Einstellung bleibt dann 
erhalten. 

Save List speichert die ak¬ 
tuelle File-Liste unter einem 
einzugebenden Namen. Es 
werden die komplette File-Liste 
und der Inhalt von »Link-File:« 
gespeichert. 

Load List ist das Gegenstück 
zu »Save List«. 

Im unteren Teil des Bild¬ 
schirms finden Sie weitere 
Hilfsfunktionen: 

Edit: erlaubt, ein beliebiges 
File mit dem voreingestellten 
Editor zu bearbeiten. Den Na¬ 
men des zu editierenden Files 
geben Sie im Feld neben dem 
Gadget ein. Ist das Feld leer 
und Sie klicken »Edit:« an, ge¬ 
schieht nichts. Sobald Sie ei¬ 
nen Namen in dieses Feld 
schreiben und < RETURN > 
drücken, wird der Editor aufge¬ 
rufen. Steht bereits ein Name in 
dem Feld, so genügt ein An¬ 
klicken von »Edit:«, um den Edi¬ 
tor zu starten. 

Word Processor arbeitet wie 
»Edit:«, allerdings wird hier die 
Textverarbeitung aufgerufen 
(wenn Sie die Aufrufparameter 
nutzen, bleibt es natürlich Ih¬ 
nen überlassen, welches Pro¬ 
gramm hier gestartet wird). 

CLI ruft einen neuen CLI- 
Task auf, der unabhängig von 
LCT läuft und auch nach Been¬ 
den dieses Programms erhal¬ 
ten bleibt. 


Start Program startet ein be¬ 
liebiges Programm, dessen Na¬ 
men Sie über ein Eingabefen¬ 
ster am unteren Rand des Bild¬ 
schirms eingeben. Auch Para¬ 
meter, die Sie hier angeben, 
werden an das aufzurufende 
Programm übergeben. 

Execute arbeitet wie »Start 
Program«, allerdings mit Batch- 
Dateien. 

Preferences steht als Bei¬ 
spiel für ein beliebiges, beim 
Aufruf an LCT übergebenes, 
Programm, dessen Name dann 
in diesem Gadget dargestellt 
wird. Voreingestellt ist das Pro¬ 
gramm »Preferences«. Wenn 
Sie mit Preferences die Farben 
des Bildschirms ändern wollen, 
beachten Sie bitte, daß dies kei¬ 
nen Einfluß auf LCT hat. LCT 
definiert seine eigene Farbta- 
belle, die Sie in »Mylncludes« 
finden (»colormapIS]«) und nur 
dort ändern können. 

Print benutzt den CLI-Befehl 
»Type« und gibt ein beliebiges 
File auf den Drucker aus. Die 
Eingabe des Namens erfolgt 
über ein Eingabefeld am unte¬ 
ren Rand des Bildschirms, das 
nach dem Anklicken von Print 
eingeblendet wird. Über zwei 
Requester werden Sie gefragt, 
ob ein Hex-Dump ausgegeben 
werden soll und ob eine Zeilen¬ 
numerierung gewünscht ist. 

Catalog zeigt den Inhalt ei¬ 
nes frei wählbaren Directory an. 
Wird keines angegeben, son¬ 
dern das String-Gadget nur mit 
< RETURN > bestätigt, so wird 
das aktuelle Directory gelesen. 
Existiert das gewählte Directo¬ 
ry, so wird ein zusätzliches Fen¬ 
ster geöffnet und die Files mit 
den gesetzten »Protection«- 
Flags und der Filegröße in 
B^es angezeigt. Sollten Sie ein 
Directory anfordern, das nicht 
existiert, dürfen Sie zur Beloh¬ 
nung eine Fehlermeldung quit¬ 
tieren. Sind mehr Einträge vor¬ 
handen, als auf einer Bitd- 


schirmseite dargestellt werden 
können, so stoppt die Ausgabe 
und kann mit einer Maustaste 
fortgesetzt werden. 

Set Date benutzt den CLI- 
Befehl »Date« (der im C-Ordner 
liegen sollte) und verlangt die 
bekannte Eingabesyntax. 

Type gibt ein File auf den 
Bildschirm aus, dessen Name 
(und gegebenenfalls Pfad) Sie 
im String-Gadget eingeben. 


Auch ein Super-Tool wie LCT 
hat kleine Schwächen: 

- LCT verändert die Anzahl der 
»BitPlanes« des Workbench- 
Screens. Wenn Sie LCT mehr¬ 
mals aufrufen, kann es sein, 
daß die Anzahl der BitPlanes 
und damit die Farben nicht 
mehr stimmen. Lassen Sie sich 
davon aber nicht beirren - die 
Funktionen von LCT sind davon 
nicht beeinträchtigt. 

- Ist LCT mit einem Befehl be¬ 
schäftigt, so wird dies durch ei¬ 
nen Mauszeiger angezeigt, der 
auf einen Pixel reduziert ist. 
Klicken Sie Gadgets nur an, 
wenn der Mauszeiger die ge¬ 
wohnte Form hat. Ansonsten 
kann es zu unvorhersehbaren 
Ergebnissen kommen. 

- CLI-Fehlermeldungen (bei¬ 
spielsweise durch ein beim Auf¬ 
ruf falsch definiertes Fenster 
verursacht) werden von LCT 
nicht angezeigt - es passiert 
einfach gar nichts. 

- Wenn Sie eine Eingabe über 
ein String-Gadget machen, 
muß diese mit < RETURN > 
quittiert werden. LCT erkennt 
sonst die Eingabe nicht. 

- Bei LCT gibt es kein Zurück! 
Wenn Sie eine Funktion aktivie¬ 
ren, wird diese erbarmungslos 
zu Ende geführt - es gibt keine 
Abbruchmöglichkeit. 

Sicher kennen Sie die Short- 
cuts der Workbench-Reque- 
ster. LCT erlaubt Ihnen den Ge¬ 
brauch dieser Hilfen in den 
String-Gadgets: (siehe Kasten 
auf dieser Seite). 

Entsteht ein Fehler bei der 
Ausführung eines Befehls, so 
wird am oberen Bildschirmrand 
ein Requester geöffnet und die 
Fehlermeldung oder Fehler¬ 
nummer ausgegeben. Durch 
Anklicken des »OK«-Gadgets 
quittieren Sie und löschen da¬ 
mit den Requester. 

Mit dem LCT steht Ihnen ein 
Werkzeug für den Lattice- 
Compiler zur Verfügung, das 


Sie sicher schon bald nicht 
mehr missen wollen - LCT 
macht aus dem C-Compiler ei¬ 
nen »KLICKompiler«. LCT ist 
fast unbegrenzt flexibel und er¬ 
weiterungsfähig. Vieles läßt 
sich über die Aufrufparameter 
realisieren. Wem das nicht 
reicht, der kann LCT über die 
Definitionen im Include-File 
verändern. 

(Hans Waldhäusel/so) 


< CRSR-links/rechts> 

Cursor im String bewegen 

<SHIFTCRSR-li/re> 

Cursor zum String-Anfang/-Ende 

<DEL> 

Zeichen unter dem Cursor löschen 

<BACKSPACE> 

Zeichen links vom Cursor löschen 

<AMIGA-rechts X> 

Zeile löschen 

<AMIGA-rechts Q> 

letzte Veränderung rückgängig machen 

<RETURN> 

Eingabe beenden 
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Die Maus als 


Aztec-C-Programmierer mußten bislang 
ohne den Komfort der Workbench aus- 
kommen. Wer keine Shell hat, muß bei je¬ 
dem Aufruf die Kommandozeile neu ein¬ 
geben. Schluß damit: Mit »Cont« bedienen 
Sie Ihren Compiler über die Maus. 


W er ärgert sich nicht 
über die Fingerakro¬ 
batik, die besonders 
dem C-Programmierervom CLI 
auferlegt wird. Ellenlange Op¬ 
tionslisten, die bei jedem Com- 
piliervorgang oder Tippfehler 
neu eingegeben werden müs¬ 
sen, gehen dem Programmie¬ 
rergewaltig auf die Nerven. Von 
jetzt an können Sie sich zurück¬ 
lehnen und entspannen: Zum 
Compilieren reicht es, wenn Sie 
eine Hand an der Maus haben. 
Vergessen Sie den Ärger über 
falsch eingegebene Komman¬ 
dozeilen, über die »Updaterei« 
Ihres Makefiles, über das 
»Durchscrollen« und Ändern 
der letzten 20 Befehle in der 
Shell. 

»Cont« (Listing 2) öffnet ein 
eigenes Fenster als »Schalt¬ 
pult« (Bild 1). Es besteht aus ins¬ 
gesamt 30 Gadgets (6 String- 
und 24 Boolean-Gadgets), die 
anfangs teilweise nicht wählbar 
sind, was Sie an der Geister¬ 
schrift erkennen können. Erst 
wenn Sie ein File als »Mainfile« 
angegeben haben, macht es 
Sinn, dessen Quellcode zu edi¬ 
tieren, auszudrucken oder zu 
compilieren. 

Geben Sie Listing 1 (»Cont- 
wind.h«) und Listing 2 ein, com¬ 
pilieren Sie »Cont« mit 
cc Cont 

und linken Sie mit 
ln Cont -Ic 

»ContWind.h« wird dabei au¬ 
tomatisch eingebunden. Es 
muß im aktuellen Verzeichnis 
liegen. Um die »ClearScr«- 
Funktion nutzen zu können, be¬ 
nötigen Sie ein solches Pro¬ 
gramm, welches das CLI-Fen- 
ster löscht und das Prompt in 
die linke obere Ecke setzt. Falls 
Sie ein solches Utility besitzen, 
kopieren Sie es in Ihren C- 
Ordner und nennen es »CLS«. 
Wenn nicht, tippen Sie Listing 3 
ab und übersetzen Sie es mit 
cc CLS 
ln CLS -Ic 

Daneben greift Cont auf die 
Befehle »type«, »dir« und »Ed« 


zu. Wenn Sie den Amiga-DOS- 
Ed nicht verwenden wollen, ko¬ 
pieren Sie einfach einen ande¬ 
ren Editor in den C-Ordner und 
nennen ihn »Ed«. Kopieren Sie 
Cont in den C-Ordner ihrer 
Startdiskette, legen Sie ein Di¬ 
rectory »:ContDir« an und er¬ 
gänzen Sie die »Startup- 
sequence« um die Zeile 
run cont 

Booten Sie jetzt von dieser 
Diskette, dann sehen Sie das 
oben beschriebene »Aztec-C 


Control-Window V4.0« auf dem 
Bildschirm. Tragen Sie hinter 
»Mainfile« Ihr Programm ein 
und die Arbeit kann beginnen: 

Hinter »Workfile« wurde auto¬ 
matisch der Name Ihres Pro¬ 
gramms mit der Endung ».c« 
eingetragen. Wenn Sie Inclu- 
des bearbeiten wollen, müssen 
Sie diese selbst angeben (hin¬ 
ter »IncIFile«). 

Starten Sie mit einem Klick 
auf das Gadget »Ed.c« den Edi¬ 
tor mit Ihrem Sourcecode. Wol¬ 
len Sie das eingestellte Include- 
file bearbeiten, klicken Sie ein¬ 
fach auf »Ed.h«. »Ed.asm« ist für 
das Nachbearbeiten des As- 
semblercodes gedacht. Cont 
ersetzt hier selbständig die En¬ 
dung ».c« durch ».asm«. Wenn 
Sie mit dem Bearbeiten des 
Sourcecodes fertig sind, spei¬ 
chern Sie und verlassen den 
Editor. Cont wartet auf das 
Beenden des Editors, bevor mit 
dem Compilieren begonnen 
werden kann. Wer den Editor 
lieber ständig im Speicher hält. 


entfernt die Zeilen 143 und 145 
(»SwitchGadgets«) aus dem 
Programm. 

Starten Sie den Compiler mit 
einem Klick auf das »cc«-Gad- 
get. Cont startet darauf den 
Aztec-Compiler mit den vorein¬ 
gestellten Optionen (hinter 
»CompOpt« können Sie diese 
ablesen). Wollen Sie andere 
Optionen verwenden, klicken 
Sie nur auf das String-Gadget 
und tragen Ihre Optionen hier 
ein. Dasselbe gilt für die 
Assembler- und Linker-Optio¬ 
nen in den Zeilen darunter. Hat 
der Compiler seine Arbeit 
beendet, so können Sie die 
Fehlermeldungen auslesen 
oder mit »as« den Assembler 
starten beziehungsweise da¬ 
nach mit »In« den Linker. 

Um sich die Arbeit zu verein¬ 
fachen, können Sie aber auch 
das »as In«- oder »cc as In«- 


Gadget verwenden. Mit letzte¬ 
rem sollten Sie allerdings etwas 
vorsichtig umgehen, denn Cont 
respektiert Ihre Wünsche kritik¬ 
los - es startet Assembler und 
Linker auch dann, wenn beim 
Compilieren noch Fehler aufge¬ 
treten sind. 

Apropos Fehler: Sie können 
die Fehlermeldungen in eine 
Error-Datei umlenken, indem 
Sie das Gadget »ErrDatei« betä¬ 
tigen. Um diese Datei auszule¬ 
sen, klicken Sie auf »Ed Err« 
oder »Prt Err«. Im ersten Fall 
werden die Fehlermeldungen 
in den Editor geladen, im zwei¬ 
ten über den Drucker ausgege¬ 
ben. 

Auf ähnliche Weise geben 
Sie Sourcefiles auf den Drucker 
aus: »Prt.c« druckt das Workfile 
aus, »Prt.asm« und »Prt.h« das 
Assemblerlisting beziehungs¬ 
weise das Headerfile. Wenn Sie 
beim Compilieren die RAM- 
Disk nutzen wollen, klicken Sie 
einfach »RAM Disk« an. Darauf 
verfärbt sich dieses Gadget. 


Von jetzt an werden alle Ausga¬ 
ben auf die RAM-Disk umgelei¬ 
tet. 

Am rechten Rand des Fen¬ 
sters sehen Sie die Gadgets 
»Dir RAM:«, »Dir DFO:« und »Dir 
DF1:«. Diese führen den einge¬ 
tragenen Befehl aus und zei¬ 
gen das Ergebnis im CLI- 
Fenster an. Schließen Sie nie 
das CLI nach dem Start von 
Cont, die Folge wäre eine »Pri¬ 
vilegverletzung« mit der Guru- 
Nummer »00 00 0008«. 

Natürlich müssen Sie die Op¬ 
tionen nicht bei jedem Cont- 
Start neu eintragen. Klicken Sie 
auf »SaveOpt.« und Ihre Optio¬ 
nen werden im File »cont.opt« 
im Directory »ContDir« gespei¬ 
chert. Beim nächsten Start kön¬ 
nen Sie nach einem Klick auf 
»LoadOpt.« mit den alten Ein¬ 
stellungen Weiterarbeiten. Das 
gleiche gilt für die Einstellung 


der Arbeitsdateien. Mit »Save- 
File« speichern Sie die Einstel¬ 
lungen und mit »LoadFile« sind 
sie beim nächsten Start wieder 
verfügbar. 

Mit »Start Pr« starten Sie ei¬ 
nen Testlauf des im Mainfile 
eingestellten Programms. 

Mit der hier vorgestellten 
Oberfläche sollten Sie in der 
Lage sein, annähernd alle Pro¬ 
grammiersituationen per Maus¬ 
klick zu meistern. Wem die 
Funktionen dennoch nicht aus¬ 
reichen, der sollte sich Listing 1 
und 2 aufmerksam anschauen. 
Es dürfte nur geringe Probleme 
bereiten, das Fenster etwas zu 
vergrößern und eigene Funktio¬ 
nen einzubauen - sehen Sie 
sich dazu die Gadget-Definitio- 
nen in »ContWind.h« an sowie 
die Abfragen in Zeile 76 bis 288 
von »Cont.c«. In jedem Fall ha¬ 
ben Sie mit Cont ein Werkzeug, 
das Ihnen endlich auch beim 
Programmieren den ersehnten 
Workbench-Komfort bringt. 

(Wilfried Siegbert/so) 



Uopkfilsldfi: cont.c 


Hainfile: dflicont 


Inclfile: dfllcontvind.h 


CoHpOpt: ^ 

Assn^t: 


LinkOpt: -Ic 


Bild 1. 30 Gadgets bilden das »Schaltpult« für Ihren Aztec-Compiler 
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r< 


OOLS 


Steuermann 


)I 1 JoO /* äöü Drucker umschalten */ 

2 qA /*»*»*****»*«»»«»»»«»*«»»«««»»««****•«*»**»«»•**«»•«*«•««»« 

***********/ 

3 Jo /* 

Includefile für Cont.o 


*/ 

4 eC 

»»««»*»»*»»/ 

5 pz /» 

« 


*/ 

6 KO /* 

Name: ContWind.h * H.J.P. 


*/ 

7 km /» 

Datum: Oot./Nov. 88 * 


•/ 

8 wG /***»»»»**»»*»»*****»*«**«*«»*«»*»»»**»»»*«»*»*»»*»»»»»*»»* 

***********/ 

9 19 struct Library »IntultlonBase; 

10 TJ struct Library »GfxBase; 

11 Uo /* 

Font Definition »/ 

12 Fu3 

struct TextAttr Font = { 

13 Gz6 

(UBYTE »)'topaz.font", 

14 Fg 

TOPAZ_EIGHTY, 

15 t3 

FS_NORMAL, 

16 Fl 

FPF_R0MF0NT 

17 aW3 

ij 

18 bdO /* Border Definition */ 

19 iN3 

SHORT GadgVeetors[] = ( 0, 0, 69, 0, 69, 11, 0, 11, 0, 1 

20 fA 

\ t 

Struct Border GadgBorder « [ 

21 GU6 

-3, -2, GBFRONTPEN, GBBACKPEN, JAMl, 5, 

22 To 

(SHORT «)CadgVectors, 

23 op 

NULL 

24 hd3 

!; 

25 mCO /» 

Prt.c Gadget */ 

26 t73 

struct IntulText PrtCText » ( 

27 IZ6 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 

28 5q 

(UBYTE *)' Prt.c ", 

29 4J 

NULL, 

30 nJ3 

!; 

31 gE 

struct Gadget PrtCGadget » ( 

32 7M6 

MULL, 

33 Gl 

13, 14, 64, 8, 

34 5v 

GADGHCOMP, 

' 35 oV 

RELVERIFY 1 GADGIMMEDIATE, 

36 2T 

BOOLGADGET, 

37 ho 

(APTR)&GadgBorder, 

38 DS 

NULL, 1 

39 ET 

iPrtCText, ' 

40 Im 

0, NULL, 0, NULL 

41 yu3 

|5 

42 FlO /» 

Ed.c Gadget */ 

43 nz3 

struct IntulText EdCText = | 

44 2q6 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, ' 

45 Fy 

(UBYTE »)" Ed.c ", 

46 La 

MULL, 

47 403 

!; 

48 JP 

struct Gadget EdCGadget > | ! 

49 FY6 

&PrtCGadget, ' 

50 kt 

92, 14, 64, 8, i 

51 MC 

GADGHCOMP, 

52 5ni 

RELVERIFY 1 GADGIMMEDIATE, 

53 Jk 

BOOLGADGET, 

54 y5 

(APTR)&GadgBorder, 

55 Uj 

NULL, 

56 05 

ScEdCText, 

57 23 

0, NULL, 0, NULL 

58 FB3 

]; 

59 Dil /* Cc Gadget »/ 

60 LD3 

struct IntulText CcText » ( 

61 J76 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 

62 cV 

(UBYTE »)' cc ", 

63 er 

NULL, 

64 LH3 

1 ; 

65 4o 

struct Gadget CcGadget = [ 

66 566 

&EdCGadget, 



171, 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

{APTR)iGadgBorder, 

NULL. 

SCcText, 

0, NULL, 0, NULL 

]; 

/« RAM Disk Gadget »/ 
struct IntulText RamDlskText = ( 

GTFRONTPEN, CTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE *)'RAM Disk', 

NULL, 

]J 

struct Gadget RamDlskGadget = [ 

&CcGadget, 

250, 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE I TOGGLESELECT, 
BOOLGAMET, 

(APTR)iGadgBorder, 

NULL, 

SRamDiskText, 

0, NULL, 0, NULL 
]i 

/* SaveOpt Gadget */ 
struct IntulText SaveOptText » ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, iFont, 
{UBYTE »)'SaveOpt.", 

NULL, 

1 ; 

struct Gadget SaveOptGadget « | 
^RamDlskGadget, 

487, 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

{APTR)&GadgBorder, 

NULL, 

SSaveOptText, 

0, NULL, 0, MULL 

]; 

/» Save File Gadget •/ 
struct IntulText SaveFlleText = ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE ») "SaveFile', 

NULL, 

}; 

struct Gadget SaveFileGadget ° [ 
SSaveOptGadget, 

408, 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

SSaveFlleText, 

0, NULL, 0, NULL 

]; 

/* ErrDat Gadget */ 

struct IntulText ErrDatText = [ 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
{UBYTE »)'ErrDatel', 

NULL, 

]; 

struct Gadget ErrDatGadget = [ 
ISaveFileGadget, 


Listing 1. In »ContWind.h« werden Ihnen die Definitionen 
der Datenstrukturen abgenommen 


67 

YA 

68 

dT 

69 

M3 

70 

al 

71 

FM 

72 

10 

73 

w2 

74 

JK 

75 

WS3 

76 

Nil 

77 

y03 

78 

a06 

79 

oP 

80 

t8 

81 

cY3 

82 

71 

83 

076 

34 

hH 

85 

uk 

86 

If 

87 

rl 

88 

Wd 

89 

2H 

90 

If 

91 

ab 

92 

nJ3 

93 

abl 

94 

Ua3 

95 

rf6 

96 

Hc 

97 

AP 

98 

tp3 

99 

x5 

100 

mk6 

101 

dP 

102 

Bl 

103 

ub 

104 

82 

105 

nu 

106 

JY 

107 

YD 

108 

ra 

109 

403 

110 

Wql 

111 

4p3 

112 

8w6 

113 

cB 

114 

Rg 

115 

A63 

116 

Vp 

117 

ol6 

118 

aF 

119 

SI 

120 

Bs 

121 

Pq 

122 

4B 

123 

ap 

124 

bM 

125 

89 

126 

LH3 

127 

311 

128 

L93 

129 

PD6 

130 

Ed 

131 

ix 

132 

RN3 

133 

51 

134 

gN6 
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135 zg 

136 jZ 

137 TU 

138 g7 

139 LS 

140 r6 

141 Xm 

142 PQ 

143 cY3 

144 UPI 

145 pa3 

146 gU6 

147 qV 

148 aE 

149 ie3 

150 CO 

151 Kq6 

152 K4 

153 Oq 

154 JQ 

155 xO 

156 cj 

157 8N 

158 CG 

159 gh 

160 tp3 

161 5pl 

162 763 

163 xl6 

164 CV 

165 GV 

166 zv 3 

167 Mb 

168 zK6 

169 gl 

170 H7 

171 Oh 

172 Ef 

173 tO 

174 Pe 

175 jy 

176 xy 

177 A63 

178 KIO 

179 kD3 
160 £26 

181 e5 

182 Xm 

183 GC3 

184 Y6 

185 W 06 

186 AJ 

187 YO 

188 Hy 

189 Vw 

190 AH 

191 gv 

192 Ea 

193 EP 

194 RN3 

195 nEO 

196 hn3 

197 VJ6 

198 CI 

199 03 

200 XT3 

201 ai 

202 JN6 

203 yf 

204 pf 

205 YF 

206 inD 

207 RY 

208 xC 

209 40 

210 VW 

211 ie3 

212 ciO 

213 Xo3 

214 isa6 

215 vv , 


329 , 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE I TOGGLESELECT, 
BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

ScErrDatText, 

0, NULL, 0, NUU 

IJ 

/* DirRam Gadget */ 
struct IntulText DirRaoiText = ( 

CTFRONTPEN, GTSACKPEN, JAM2, 0, 0, iFont, 
(UBYTE »)'Dlr RAM:', 

NULL, 

!; 

struct Gadget DirRamGadget » [ 

SErrOatGadget, 

566, 14, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

{APTR)&GadgBorder, 

NULL, 

&DirRainText, 

0, NULL, 0, NULL 

IJ 

/* Prt.asm Gadget »/ 
struct IntulText PrtAsmText = ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE »)" Prt.asm', 

Nua, 

]J 

struct Gadget PrtAsmGadget » ( 

&DlrRaniGadget, 

13 , 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)8iGadgBorder, 

NULL, 

&PrtA8niText, 

0, NULL, 0, NULL 

i; 

/» Ed.asm Gadget »/ 

struct IntulText EdAsmText * ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBHE »)' Ed.asm ', 

NULL, 

h 

struct Gadget EdAsmGadget 3 [ 

&PrtAsmCadget, 

92, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

&EdAsmText, 

0, NULL, 0, NULL 

)> 

/* As Gadget */ 

struct IntulText AsText » j 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE *)' as 
NULL, 
li 

struct Gadget AsGadget * ( 
iEdAsrnGadget, 

171, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

&AsText, 

0, NULL, 0, NULL 

); 

/* AsLn Gadget */ 

struct IntulText AsLnText = ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, SFont, 
(UBYTE *)" as ln ', 


216 

5K 

217 

ok3 

218 

7h 

219 

8T6 

220 

7m 

221 

6w 

222 

pW 

223 

3U 

224 

ip 

225 

ET 

226 

W7 

227 

mn 

228 

sv3 

229 

qUO 

230 

Kq3 

231 

3i6 

232 

Ua 

233 

Mb 

234 

513 

235 

9 I 

236 

XC6 

237 

3u 

238 

ND 

239 

6n 

240 

Kl 

241 

z6 

242 

Vk 

243 

W1 

244 

34 

245 

GC3 

246 

mjO 

247 

s53 

248 

K86 

249 

P9 

250 

ds 

251 

MI 3 

252 

02 

253 

a66 

254 

Ok 

255 

eU 

256 

N4 

257 

b2 

258 

GN 

259 

ml 

260 

ZA 

261 

KL 

262 

XT3 

263 

PWO 

264 

xb3 

265 

bP6 

266 

9z 

267 

u9 

268 

dZ3 

269 

vW 

270 

eB6 

271 

PB 

272 

vl 

273 

eL 

274 

sJ 

275 

Xe 

276 

31 

277 

ZX 

278 

bc 

279 

ok3 

280 

100 

281 

SV3 

282 

sg6 

283 

Rc 

284 

BQ 

285 

uq3 

286 

za 

287 

ac6 

288 

kZ 

289 

C2 

290 

vc 

291 

9a 

292 

ov 

293 

KZ 

294 

FJ 

295 

st 

296 

513 


struct Gadget AsLnGadget 3 ( 

KAsGadget, 

250, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)S:GadgBorder, 

NULL, 

&A8LnText, 

0, NULL, 0, MULL 
)5 

/* LoadOpt Gadget */ 

struct IntulText LoadOptText = [ 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE »)'LoadOpt.', 

NULL, 

): 

struct Gadget LoadOptGadget 3 [ 

&AsLnGadget, 

487, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)iGadgBorder, 

NULL, 

&LoadOptText, 

0, NULL, 0, NULL 

); 

/» Load File Gadget »/ 

struct IntulText LoadFlleText * ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE *)'LoadFlle', 

NULL, 

)J 

struct Gadget LoadFileGadget = ( 
&LoadOptGadget, 

408, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)ScGadgBorder, 

NULL, 

SiLoadFlleText, 

0, NULL, 0, NULL 

jj 

/* PrtErrDat Gadget »/ 

struct IntulText PrtErrDatText = ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE »)'Prt Err ', 

NULL, 

)> 

struct Gadget PrtErrDatGadget * [ 
&LoadFlleGadget, 

329 , 28, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)4GadgBorder, 

NULL, 

yrtErrDatText, 

0, NUU, 0, NULL 
)5 

/» Dir DFO: Gadget */ 

struct IntulText DlrDfOText » { 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, fcFont, 
(UBYTE »)'Dlr DFO:', 

NUU, 

!; 

Struct Gadget DirDfOGadget = ( 
&PrtErrDatGadget, 

566, 28, 64, 8, 

GADGHCOMP, 

RELVERIFY l GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

&DlrDfOText, 

0, NULL, 0, NULL 
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Tc 


OOLS 


297 UzO 

298 Rk3 

299 9x6 

300 dT 

301 Sh 

302 B73 

303 01 

304 2N6 

305 sg 

306 TJ 

307 Ct 

308 Qr 

309 5C 

310 bq 

311 61 

312 9A ' 

313 MI3 

314 sQO 

315 fX3 

316 (3E6 

317 TU 

318 jy 

319 S03 

320 w7 

321 766 

322 MH 

323 ka 

324 TA 

325 h8 

326 MT 

327 87 

328 ruc 

329 QR 

330 d23 

331 OKO 

332 C03 

333 hV6 

334 n7 

335 OF 

336 Jf3 

337 gl 

338 ay6 

339 wZ 

340 Ir 

341 kR 

342 yP 

343 dk 

344 90 

345 Tt 

346 hl 

347 uq3 

348 rZO 

349 wx3 

350 yiii6 

351 nF 

352 HW 

353 Otf3 

354 MT 

355 Xy6 

356 5g 

357 18 

358 11 

359 Fg 

360 ul 

361 Qf 

362 fN 

363 ye 

364 B73 

365 meO 

366 Va3 

367 F36 

368 Hl 

369 Yd 

370 HD3 

371 60 

372 SR6 

373 10 

374 ZP 

375 Iz 

376 Wx 


/* Prt.h Gadget */ 

struct IntulText PrtHText = { 

CTFRONTPEN, GTBACKPEN, JAH2, 0, 0, &Font, 

(UBYTE »)'Prt.h 

NüU, 

]! 

struct Gadget PrtHGadget = [ 
iDlrDfOGadget, 

13, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

ftPrtHText, 

0, NULL, 0, NULL 

j; 

/* Ed.h Gadget */ 

struct IntulText EdHText = [ 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, 4Font, 
(UBYTE *)'Ed.h ’, 

NULL. 

!j 

struct Gadget EdHGadget = { 

&PrtHGadget, 

92, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

SEdHText, 

0, NULL, 0, NULL 

1 ; 

/* Ln Gadget »/ 

struct IntulText LnText * | 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, 4Font, 

(UBYTE»)' ln 

NULL, 

h 

struct Gadget LnGadget » ( 

ScEdHGadget, 

171, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

SLnText, 

0, NULL, 0, NULL 

j; 

/» CoAsLn Gadget »/ 

struct IntulText CcAsLnText = 1 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE ») 'cc as ln', 

NULL, 

1 ; 

struct Gadget CcAsLnGadget = { 

4LnGadget, 

250, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)iGadgBorder, 

NULL, 

SCoAsLnText, 

0, NULL, 0, NULL 

!; 

/» ClearScr Gadget »/ 

struct IntulText CiearSorText = ( 

CTFRONTPEN, GTBACKPEN, JAH2, 0, 0, SiPont, 
(UBYTE *)'ClearScr', 

NULL, 

j; 

struct Gadget ClearScrGadget = { 
&CcAsLnGadget, 

487, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 


377 BI 

378 hw 

379 ln 

380 FG 

381 S03 

382 zFO 

383 fe3 

384 WK6 

385 CY 

386 p4 

387 YU3 

388 so 

389 no6 

390 ye 

391 qg 

392 ZG 

393 DE 

394 SZ 

395 yD 

396 WH 

397 WX 

398 Jf3 

399 AGO 

400 3y3 

401 nb6 

402 af 

403 6L 

404 pl3 

405 iZ 

406 aR6 

407 N5 

408 7x 

409 qX 

410 4V 

411 Jq 

412 FU 

413 DL 

414 no 

415 0tf3 

416 OcO 

417 8ra3 

418 4s6 

419 gs 

420 Nc 

421 623 

422 Ho 

423 IM6 

424 IT 

425 OE 

426 7o 

427 Ln 

428 07 

429 W1 

430 UZ 

431 45 

432 HD3 

433 IQO 

434 7n 

435 q93 

436 c3 

437 Ky6 

438 nU 

439 WX 

440 PL3 

441 GOO 

442 7f3 

443 Gu 

444 Cs6 

445 FB 

446 Ik 

447 03 
446 NO 

449 YU3 

450 HC 

451 7L6 

452 Zo 

453 kl 


(APTR)&GadgBorder, 

MULL, 

&ClearScrText, 

0, NULL, 0, NULL 

); 

/» Start Pr Gadget */ 

struct IntulText StartPrText = ( 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE »)'Start Pr', 

NULL, 

!; 

struct Gadget StartPrGadget = [ 
&ClearScrGadget, 

408, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

SStartPrText, 

0, NULL, 0, NULL 

); 

/• EdErrDat Gadget */ 

struct IntulText EdErrDatText = { 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font. 
(UBYTE »)' Ed Err ', 

NULL, 

)i 

struct Gadget EdErrDatCadget » ( 
ScStartPrGadget, 

329, 42. 64, 8, 

GADGHCOMP, 

RELVERIFY I GADGIMMEDIATE, 

BOOLGADGET, 

(APTR)iGadgBorder, 

NULL, 

lEdErrDatText, 

0, NULL, 0, NULL 

)J 

/» Dir DFl: Gadget »/ 

struct IntulText DlrDflText » | 

GTFRONTPEN, GTBACKPEN, JAM2, 0, 0, &Font, 
(UBYTE »)'Dir DFl:", 

NULL, 

]; 

struct Gadget DlrDflGadget = { 
StEdErrDatGadget, 

566, 42, 64, 8, 

GADGHCOMP, 

RELVERIFY l GADGIHMEDIATE, 

BOOLGADGET, 

(APTR)&GadgBorder, 

NULL, 

8cDlrDflText, 

0, NULL, 0, NULL 


UBYTE UndoBuffer[MAXSTRSIZE]; 

/» StrlngBorder Definition */ 

SHORT StrlngVectors[] =■ ( 0, 0, 227, 0, 

1 , 0 , 1 }; 

struct Border StrlngBorder = ( 

-3, -2, SBFRONTPEN, SBBACKPEN, JAHl, 5, 
(SHORT »)StrlngVectors, 

NULL 

I; 

/» Workflle Gadget */ 

UBYTE UorkflleBuffer[MAXSTRSIZE]; 
struct Strlnglnfo Workfllelnfo = ( 
WorkflleBuffer, 

UndoBuffer, 

0 , 

MAXSTRSIZE, 

0, 0, 0, 0, 0, 0, NULL, 0, MULL 


struct IntulText WorkfileText = ( 

STFRONTPEN, STBACKPEN, JAHl, -77, 0, &Font, 
(UBYTE *)"Workflle:", 

NULL 


227, 11, 
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454 äZ3 

455 aQ 

456 Xt6 

457 kq 

458 vl 

459 OD 

460 vnn 

461 GY 

462 31 

463 SZ 

464 a2 

465 00 

466 OC 

467 qiii3 

468 OmO 

469 JY3 

470 Og 

471 IU6 

472 gc 

473 JB 

474 pU 

475 op 

476 zv3 

477 AK 

478 Yra6 

479 fE 

480 BC 

481 403 

482 MU 

483 hk6 

484 B3 

485 HC 

486 pe 

487 ND 

488 hz 

489 Uj 

490 4S 

491 IT 

492 HW 

493 Rd 

494 HD3 

495 TpO 

496 883 

497 TJ 

498 gt6 

499 73 

500 Ac 

501 Gv 

502 FG 

503 (3H3 

504 kP 

505 2iD6 

506 3d 

507 cd 

508 VR3 

509 Pu 

510 Jd6 

511 qi 

512 nd 

513 05 

514 oe 

515 8Q 

516 vA 

517 T2 

518 Su 

519 rb 

520 e4 

521 ie3 

522 eEO 

523 X03 

524 PD 

525 ir6 

526 YD 

527 b3 

528 hM 

529 gh 

530 m3 

531 9w 

532 Ti6 

533 Z6 

534 34 

535 tfs3 


struct Gadget WorkfileGadget = { 
iDlrDflGadget, 

92, 56, 220, 10, 

GADGHCOMP, 

RELVERIFY, 

STRGADGET, 

(APTR)&StrlngBorder, 

NULL, 

AWorkfileText, 

0 , 

(APTR)iWorkfilelnfo, 

0, MULL 

); 

/* Malnflle Gadget »/ 

UBYTE MalnflleBuffer[MAXSTRSIZE]; 
struct Stringinfo Mainfilelnfo » ( 
MainfileBuffer, 

UndoBuffer, 

0 , 

MAXSTRSIZE, 

0, 0, 0, 0, 0, 0, NULL, 0, NULL 
jj 

struct IntuiText HainflleText ■ { 

STFRONTPEN, STBACKPEN, JAMl, -77, 0, &Font, 
{UBYTE *)*Hainflle:', 

NULL 

1 ; 

struct Gadget HainfileQadget > [ 

&WorkflleGadget, 

92, 70, 220, 10, 

GADGHCOMP, 

RELVERIFY, 

STRGADGET, 

(APTR)&StringBorder, 

NUU, 

&KainfileText, 

0 , 

(APTR)8cMainfileInfo, 

0, NULL 

); 

/» Inolflle Gadget »/ 

UBYTE InclfileBuffer[MAXSTRSIZE]j 
struct Stringinfo Inclfilelnfo ■ ( 
InclflleBuffer, 

UndoBuffer, 

0 , 

MAXSTRSIZE, 

0, 0, 0, 0, 0, 0, NULL, 0, NULL 

)J 

struct IntuiText InclflleText » ( 

STFRONTPEN, STBACKPEN, JAMl, -77, 0, AFont, 
(UBYTE »)"Inclflle:', 

NULL 

j; 

struct Gadget InclfileGadget ■ { 
AMainfileGadget, 

92, 84, 220, 10, 

GADGHCOMP, 

RELVERIFY, 

STRGADGET, 

(APTR)&StrlngBorder, 

NULL, 

MnclflleText, 

0 , 

(APTR)&InclfileInfo, 

0, NULL 

]; 

/» Compiler Optlons Gadget »/ 

UBYTE ConipOptBuffer[HAXSTRSIZE] » ( '-a”) j 
struct Stringinfo CoinpOptlnfo = [ 
CorapOptBuffer, 

UndoBuffer, 

0 , 

MAXSTRSIZE, 

0, 0, 0, 0, 0, 0, NULL, 0, NUU 

}! 

struct IntuiText CompOptText = [ 

STFRONTPEN, STBACKPEN, JAMl, -78, 0, &Font, 
(UBYTE *)'ConipOpt:", 

NULL 


536 Bb struct Gadget CoropOptGadget = 

537 iD6 «.InclfileGadget, 

538 kj 408, 56, 220, 10, 

539 E4 GADGHCOMP, 

540 hW RELVERIFY, 

541 F5 STRGADGET, 

542 Zr (APTR)«StringBorder, 

543 Mb NULL, 

544 4q ACompOptText, 

545 tL 0, 

546 BF (APTR)8.CoinpOptInfo, 

547 JV 0, NULL 

548 953 1 5 

549 YaO /* Assembler Options Gadget »/ 


550 kA3 UBYTE AssmOptBuffer[MAXSTRSIZE] » { ")i 

551 7g struct Stringinfo AssmOptlnfo = ( 

552 Qe6 AssmOptBuffer, 

553 ev UndoBuffer, 

554 2U 0, 

555 8n MAXSTRSIZE, 

556 78 0, 0, 0, 0, 0, 0, NULL, 0, NULL 

557 IE3 ) 1 

558 Ge struct IntuiText AssmOptText = { 

559 u96 STFRONTPEN, STBACKPEN, JAMl, -78, 0, iFont, 

560 Ht (UBYTE »)'A8sm0pt:", 

561 UV NULL 

562 NJ3 ); 

563 eJ struct Gadget AssmOptGadget z [ 

564 156 «rCompOptGadget, 

565 xs 408, 70, 220, 10, 

566 fV GADGHCOMP, 

567 8x RELVERIFY, 

568 gW STRGADGET, 

569 01 {APTR)&StringBorder, 

570 n2 NULL, 

571 rx «AssmOptText, 

572 Km 0, 

573 Ix (APTR)&A83m0ptInfo, 

574 k« 0, NULL 

575 aW3 }; 

576 CEO /» Link Optlons Gadget •/ 


577 dT3 UBYTE LlnkOptBuffer[KAXSTRSIZE] « | 

578 DU struct Stringinfo LinkOptlnfo ■ ( 

579 FN6 LlnkC^tBuffer, 

580 QM UndoBuffer, 

581 Tv 0, 

582 ZE MAXSTRSIZE, 

583 Y2 0, 0, 0, 0, 0, 0, NULL, 0, NULL 

584 jf3 }j 

585 3k struct IntuiText Lini 

586 La6 STFRONTPEN, STBACK 

587 6c (UBYTE »)'LinkOpt: 

588 VW NULL 

589 ok3 ); 

590 S8 struct Gadget LinkOpI 

591 5C6 «AssmOptGadget, 

592 cc 408, 84, 220, 10, 

593 6w GADGHCOMP, 

594 ZO RELVERIFY, 

595 7x STRGADGET, 

596 RJ (APTR)&StringBord€ 

597 ET NULL, 

598 ak «.LinkOptText, 

599 ID 0, 

600 53 (APTR)8.LlnkOptInfc 

601 BN 0, NULL 

602 1x3 ] 5 

603 400 /» Window Definition »/ 


('-icii 


struct IntuiText LinkOptText = [ 

STFRONTPEN, STBACKPEN, JAMl, -78, 0, &Font, 
(UBYTE »)'LinkOpt:', 

NULL 

1 ; 

struct Gadget LinkOptGadget » ( 

«AssmOptGadget, 

408, 84, 220, 10, 

GADGHCOMP, 

RELVERIFY, 

STRGADGET, 

(APTR)&StringBorder, 

NULL, 

«.LinkOptText, 

0 , 

(APTR)8.LlnkOptInfo, 

0, NULL 


604 xu3 st 

605 Q96 

606 ZX 

607 z5 

608 ep 

609 vN 

610 tu 

611 tR 

612 p8 

613 C83 ] 5 

(C) 1989 H8.T 


struct NewWindow NewWlndow » ( 

0, 0, 640, 96, WDETAILPEN, WBLOCKPEN, 
CLOSEWINDOW I GADGETUP, 

WINDOWCLOSE I SMART_REFRESH I ACTIVATE I WINDC 
WINDOWDEPTH I NOCAREREFRESH, 

«LinkOptGadget, 

0 , 

(UBYTE »)'Aztec-C Control-Window V4.0', 0, 0, 
0 , 0 , 0 , 0 , 

WBENCHSCREEN 
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Programmname: Listing 2 


Computer: A500, A1000, A2000 mit Kickstart 1.2 


Sprache: C 


Compiler: Aztec 


Aufrufe: siehe Text 


Programmautor: Hans-Jrgen Pieriok 


/» fiSü Drucker unschalten */ 

/»*»*«*»«»«««»«**«»»«*»«***»«»»*»»*»***»**»**»»»«,»«»,»»«»» 

/* Aztec-C Control-Ulndow V4.0 

V 

/»**»»»*»*«»»*»»««»«*»»»»«»«»*«»»»*»«»*»»»**««»*»»«»»*»»»*, 

/* Programmname: Cont.c * 

*/ 

/* Includefllename: ContWind.h * H.J.P. 

»/ 

/* Datum: Oct./Nov. 88 * 

V 

«*»•**»»«»»/ 

#define MAXSTRSIZE 200 /» UndoBuffer für StringOadget 


s »/ 

#define EDITOR "ed ' /» Ein Space hinter Edltorname 

n */ 

#deflne GBFRONTPEN 3 /* Gadget Border Front Farbe 


#deflne GBBACKPEN 0 /» Gadget Border Back Farbe 

»/ 

#define GTFRONTPEN 3 /* Gadget Text Front Farbe 

*/ 

#deflne GTBACKPEN 2 /» Gadget Text Back Farbe 

»/ 

#deflne SBFRONTPEN 2 /• String Border Front Farbe 


#define SBBACKPEN 2 /* String Border Back Farbe 

V 

#deflne STFRONTPEK 3 /* String Text Front Farbe 

V 

#deflne STBAOKPEN 0 /» String Text Back Farbe 

V 

#deflne WDETAILPEK 2 /» Window Text Farbe 


#define WBLOCKPEN 3 /* Window Border Farbe 

*/ 

#lnclude <9tdio.h> 

#lnclude <exeo/types.h> 

#lnclude <intuition/lntuitlon.h> 

#lnclude <funotlon9.h> 

#lnclude 'ContWind.h" 

FILE «fp, »fopenO; 
statlc RamDlsk»0; 
statlc ErrDat=0; 
statlc UBHE exstr[MAXSTRSIZE] j 
mainO 
{ 

struct Window »Window; 

struct IntulKessage »Message; 

ULONG dass; 

APTR address; 

If ((IntuitlonBase=OpenLibrary('Intuition.library", 33L 

)) *= NULL) 
goto beenden; 

If ((GfxBase=OpenLibrary('graphios.library', 33L)) == N 

ULL) 

goto beenden; 

if ((Window=OpenWindow(&NewWindow)) == NULL) 
goto beenden; 

SwitchGadgets(OffGadget, Window); 

ActivateGadget(&HainflleGadget, Window, NULL); 

FOREVER 

[ 

Walt (1L< < Window- > UserPort-> oip_SlgBit); 

whlle (Message=(struot IntulMessage *)GetMsg(Window- 

>UserPort)) 


78 Cf6 

79 oq7 

80 61 

81 kP 

82 kS 

83 nZ 
64 226 

85 xqO 

86 uR4 

87 Lo6 

88 Xs7 

89 tl 

90 0r9 

91 BRA 

92 EO 

93 tk 

94 eW 

95 DD9 

96 EE6 

97 DJO 

98 ih4 

99 X06 

100 Zp7 

101 5D 

102 a39 

103 46A 

104 j9 

105 So 

106 qi 

107 nQ 

108 W5 

109 BQ 

110 SS9 

111 TT6 

112 TRO 

113 694 

114 mF6 

115 1N7 

116 KS 

117 pI9 

118 16A 

119 Eo 

120 OT 

121 5x 

122 ee9 

123 ff6 

124 jKO 

125 uP4 


class°Message->CIass; 
address»Kessage-> lAddress; 

ReplyMsg(Message); 
swltch(class) 

I 

case GADGETUP: 

GadgetHessage(address.Window); 
break; 

case CLOSEWINDOW: 

whlle (Message=(8truot IntulMessage »)GetHsg 
(Window->U5erPort)) ReplyMsg(Message); 
goto beenden; 

1 /* switch */ 

] /* whlle »/ 

) /* FOREVER «/ 

beenden: 

if (Window) Cl08eWlndow(Wlndow); 

if (GfxBase) CloseLlbrary(GfxBase); 

if (IntuitlonBase) CloseLibrary(IntultlonBase); 
j /» maln »/ 

QadgetMessage(address,w) 

APTR address; 
struct Window »w; 

( 

/• RAM Disk »/ 

if (address =» (APTR)iRaiiiDlskGadget) RamDisk ? (RamDisk 
=0) : (RainDisk=l); 

/» ErrDat •/ 

if (address =* (APTR)&ErrDatGadget) ErrDat ? (ErrDat=0) 

: (ErrDat=l); 

/» Malnflle */ 

If ({address (APTR)iHainfileGadget) && (MalnfileBuff 
er[0])) 

! 

strcpy(&WorkfileBuffer, ftMainflleBuffer); 

Street(WorkfileBuffer, '.c'); 
RefreshGadgets(8iWorkfileGadget, w, NULL); 
ActlvateGadget{&InclflleGadget, w, NULL); 
SwitchGadget8(0nGadget, w); 

1 /* if */ 

/* Save Opt »/ 

if (address (APTR)&SaveOptGadget) 

l 

fp«fopen( 'ContDlr/Cont. opt", 'w"); 
if (fp !« NULL) 


fwrite(CompOptBuffer, MAXSTRSIZE, 1, fp) 
fwrite(LlnkOptBuffer, MAXSTRSIZE, 1, fp) 
fwrite(A8sm0ptBuffer, MAXSTRSIZE, 1, fp) 
fclose(fp); 

) /* If V 
) /• if V 

/* Load Opt »/ 

if (address »» {APTR)&Load0ptGadget) 

[ 

fp»fopen( 'ContDlr/Cont.opt", 'r"); 
if (fp 1» MULL) 

! 

fread(CoiiipOptBuffer, MAXSTRSIZE, 1, fp); 
fread(LlnkOptBuffer, MAXSTRSIZE, 1, fp); 
fread(AssinOptBuffer, MAXSTRSIZE, 1, fp); 
fclose(fp); 

Refre8hGadgets(&Llnk0ptGadget, w, NULL); 
RefreshGadgets(&AssmOptGadget, w, NULL); 
RefreshGadgets(&Co[npOptGadget, w, NULL); 

1 /* if */ 

) /* if */ 

/» Save File */ 

if (address == {APTR)&SaveFlleGadget) 

[ 

fp=fopen( 'ContDlr/Cont.flle', 'w'); 
if (fp 1= NULL) 

[ 

fwrlte(WorkflleBuffer, MAXSTRSIZE, 1, fp) 
fWTite(MainflleBuffer, MAXSTRSIZE, 1, fp) 
fwritehnclfileBuffer, MAXSTRSIZE, 1, fp) 
fclo8e(fp); 

) /* if */ 

) /* if */ 

/« Load File */ 

if (address == {APTR)&LoadFlleGadget) 
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126 yR6 

( 

127 1F7 

fp=fopen( 'ContDlr/Cont.file', "r')j 

128 We 

if (fp != NULL) 

129 1Ü9 

{ 

130 CgA 

fread(WorkflleBuffer, MAXSTRSIZE, 1, fp)j 

131 09 

fread(MalnfHeBuffer, MAXSTRSIZE, 1, fp)j 

132 NJ 

freadÜnclfileBuffer, MAXSTRSIZE, 1, fp); 

133 H9 

fclo8e(fp)j 

134 bO 

RefreshGadgets(&WorkflleGadget, w, NULL); 

135 nj 

RefreshGadgets(&MalnflleGadget, w, 3^LL); 

136 rat 

RefreshGadgets(&InclflleGadget, w, MULL); 

137 fa 

SwltchGadgets{OnGadget, w); 

138 uu9 

) /» if */ 

139 vv6 

) /* If •/ 

140 krO /* Ed.c »/ 

l4l Nr4 

If (address =* (APTR)8cEdCGadget) 

142 Eh6 

{ 

143 ilc7 

SwitchGadgets(OffGadget, v); 

144 2X 

ExEdCWorkflleBuffer); 

145 nZ 

SwltchGadgets(OnGadget, v); 

l46 wk6 

] /» If V 

147 DNO /» Start Pr »/ 

148 0q4 

If (address «= (APTR)&StartPrGadget) 

149 L06 

( 

150 pr7 

SwltchGadgets(OffGadget, u); 

151 yv 

Exeeute(MalnfileBuffer,OL,OL); 

152 ug 

SvltchGadgets(OnGadget, w); 

153 3r6 

! ./* If */ 

154 bLO /» AsLn */ 

155 u54 

if (address (APTR)&A8LnOadget) 

156 Sv6 

( 

157 wy7 

SwltohGadgets(OffGadget, w); 

158 Ut 

A8(); 

159 o7 

lJi()3 

160 2o 

SwitchGadget8(0nGadget, w); 

161 HK6 

1 /» If »/ 

162 920 /» CcAsLn »/ 

163 zS4 

if (address ** (APTR)&CcAsLnGadget) 

164 a36 

( 

165 467 

SwltchGadgets(OffGadget, w); 

166 u5 

Ce(); 

167 d2 

AsO; 

168 10 

Ln(); 

169 Bx 

SwltchGadgets(OnGadget, u); 

170 QQ6 

} /* if •/ 

171 ÜXO /» Cc */ 

172 f04 

if (address >■ (APTR)&CcGadget) 

173 jC6 

( 

174 DF7 

SvltchGadgets(OffGadget, v); 

175 3E 

Cc(); 

176 14 

SultchGadget3(0nGadget, w); 

177 XX6 

j /* if V 

178 zyO /« As »/ 

179 wV4 

if (address (APTR]&AsGadget) 

180 qJ6 

( 

181 KM7 

StfltchGadget8(0ffGadget, w); 

182 sH 

As(); 

183 PB 

SwitchGadget8(0nGadget, w); 

184 ee6 

] /» if •/ 

185 VzO /» Ln */ 

186 M14 

if (address == (APTR)6LnGadget) 

187 xQ6 

( 

188 RT7 

SwitchGadgets(OffGadget, w); 

189 6b 

Ln()3 

190 WI 

SwltchGadgets(OnGadget, w); 

191 116 

) /* if »/ 

192 JtO /» Dir DFO: »/ 

193 Va4 

if (address == (APTR)&DirDfOGadget) 

194 4X6 

( 

195 NF7 

ExDir("dfO:'); 

196 qq6 

) /• if */ 

197 1300 /• 

Dir DFl: */ 

198 ek4 

if (address == (APTR)&DlrDflGadget) 

199 9o6 

( 

200 YM7 

ExDir( 'dfl:*); 

201 w6 

1 /* if »/ 

202 mdO /» Dir RAM: »/ 

203 ol4 

if (address == (APTR)&DirRamGadget) 

204 Eh6 

1 

205 wl7 

ExDir( 'ram:'); 

206 006 

) /* if »/ 

207 HQO /» 

Prt.c •/ 

208 604 

if (address == (APTR)4PrtCGadget) 




209 Jm6 

210 np7 

! 

S«ltchGadgets(OffGadget, v)) 

211 le 

ExPrlnt(WorkfileBuffer, "); 

212 se 

SultchGadgets(OnGsdget, u); 

213 776 

) /• if •/ 

214 PhO 

/* Prt.asm */ 

215 1S4 

216 Qt6 

if (address =» (APTR)&PrtAsmGadget) 

! 

217 Utf7 

SwitchGadget8(0ffGadget, w); 

218 XV 

ExPrint(MalnflleBuffer, '.asm"); 

219 zl 

SwltchGadgets(OnGadget, w); 

220 EE6 

1 /• if »/ 

221 p30 

/» Prt.h */ 

222 WJ4 

if (address =* (APTa)6PrtHGadget) 

223 X06 

( 

224 137 

SwitchGadgets(OffGadget, w); 

225 ap 

ExPrintdnolfileBuffer, ") ; 

226 6s 

SwitehGadgets(OnGadget, w); 

227 LL6 

j /* if •/ 

228 gLO 

/* Ed .asm */ 

229 m34 

if (address »= (APTR)&EdAsmOadget) 

230 e76 

231 8A7 

[ 

SvitchGadgets(OffGadget, w); 

232 57 

ExBefehl('ed ', '.asm', "); 

233 Dz 

SuitchGadgets(OnGadget, w); 

234 SS6 

] /* if */ 

235 hTO 

/» ClearScr */ 

236 Pin4 

if (address »« (APTR)&ClearScrGadget) 

237 1E6 

238 MH7 

[ 

exstr[0]»'\0’; 

239 Oq 

strcat(ex0tr, 'cls'); 

240 cO 

Execute(exstr, OL, OL); 

241 ZZ6 

) /» if V 

242 dpO 

/* Ed.h */ 

243 Vf4 

244 sL6 

If (address == (APTR)&EdHGadget) 

1 

245 M07 

SwitchGadgets(OffGadget, v); 

246 IK 

ExEd(IrolfileBuffer); 

247 RD 

SwitchGadget8(0nGadget, u); 

246 gg6 

j /» if */ 

249 tAO 

/* Prt Err «/ 

250 2a4 

if (address •» (APTR)&PrtErrDatGadget) 

251 zS6 

l 

252 TV7 

SwitchGadget8(0ffGadget, w); 

253 Cg 

ExPrlnt( 'ContDir/Cont.err', "); 

254 YK 

SwitchGadgets(OnGadget, w); 

255 rm6 

j /» if »/ 

256 PfO 

/* Ed Err */ 

257 kx4 

258 6Z6 

if (address •* (APTR)4EdErrDatGadget) 

( 

259 ac7 

SwitchGadgets(OffGadget, w) ; 

260 mU 

ExEd( 'ContDir/Cont.err') ; 

261 fR 

SwltchGadgets(OnGadget, w); 

262 uu6 

j /* if V 

263 C33 

} /* Gadget Message »/ 

264 snO 

Ce() 

265 Dg3 

266 2B4 

[ 

UBYTE txt[25]; 

267 Rg 

(ErrDat) 7 (strcpy(txt, 'cc >ContDir/Cont.err ')) : (s 
trcpy(txt, 'cc ")); 

268 Tj 

269 Hk6 

if (RamDisk) 

( 

270 097 

ExBefehl(txt, ' -0 RAM:cprtefflp.asin ", CompOptBuffer) 

271 336 

) /* if */ 

272 D04 

eise 

273 L06 

274 6a7 

( 

ExBefehl(txt, " ', CompOptBuffer); 

275 gP6 

] /* eise */ 

276 6R3 

) /» Cc »/ 

277 nwO 

As() 

278 (3t3 

279 eu4 

280 Sv6 

( 

if (RamDisk) 

[ 

281 a77 

Exeoute('as RAMicprtemp.asm', OL, OL); 

262 FL 

Execute('delete RAM:eprtemp.asm", OL, OL); 

283 FF6 

) /* if */ 

284 PC4 

eise 

285 X06 

( 

286 E57 

ExBefehl("as ", " ', AssmOptBuffer); 

287 3b6 

1 /* eise •/ 

288 En3 

J /» As */ 

289 6L0 

Ln() 
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Ti 


OOLS 


290 c53 

[ 

291 q64 

if (RamDisk) 

292 e76 

{ 

293 2Q7 

ExBefehl('lr -0 ", " RAH:cprtemp.o ", LinkOptBuffer) 

294 IJ 

Execute{"delete RAHicprtemp.o", OL, 0L)j 

295 RR6 

] /» if »/ 

296 b04 

eise 

297 jC6 

i 

298 3w7 

ExBefehl("ln ", '.o ", LinkOptBuffer); 

299 4n6 

i /* eise */ 

300 dI3 

j /* Ln »/ 

301 hkO ExBefehl(8trl, str2, str3) 

302 ny3 

UBHE *strl[], *str2[], *3tr3[]; 

303 pl 

( 

304 QL4 

exstr[0]s'\0'; 

305 vM 

strcat{exstr, strl); 

306 MV 

3trcat(exstr, HainfileBuffer); 

307 IT 

strcat(exstr, str2); 

308 6Z 

strcat(exstr, 3tr3); 

309 J7 

Execute(exstr, OL, OL); 

310 UJ3 

) /* Exßefehl */ 

311 OcO ExPrint(strl, str2) 

312 Ap3 

UBYTE *3trl[J, str2t]; 

313 zS 

1 

314 eV4 

exstr£;0]s'\0'; 

315 7E 

6trcat(exstr, "type "); 

316 6X 

strcat{ex3tr, strl); 

317 Bd 

stroat(exstr, str2); 

318 N8 

strcat(exstr, ' to prt:*); 

319 tH 

Execute(exstr, OL, OL); 

320 eb3 

1 /* ExPrint */ 

321 IhO ExDir(strl) 

322 433 

UBYTE »strl[); 

323 9o 

! 

324 kf4 

exstr[0]»'\0'; 

325 6S 

8trcat(ex8tr, "dir "); 

326 Gh 

strcat(ex3tr, strl); 

327 IP 

Execute(exstr, OL, OL); 

328 P73 

! /* ExDlr */ 

329 gaO 

ExEd(8trl) 

330 CB3 

UBYTE »strl[]; 

331 Hk 

l 

332 sn4 

exstr[0]='\0'; 

333 Xra 

strcat(exstr, EDITOR); 

334 Op 

strcat{ex3tr, strl); 

335 9X 

Execute(exstr, OL, OL); 

336 5o3 

) /» ExEd */ 



Programmautor: Hans_Jürgen Plerlck 


1 dsO /«»»*»»»«»*»»»»»»»»*«»»»»» 

2 8y »* »» 

3 tra •» CLS.o fuehrt einen »* 

4 Ca ** Seltenvorsohub aus »» 

5 Bl ** »• 

6 ix »*»*»»»*»«»»»»**»»»«*»»»»/ 

7 oA mainO 

8 4X ( 

9 SEÜ prlntft^f'); 

10 AfO } 

(C) 1989 K&T 


Listing 3. 

»CLS.c« löscht das 
aktuelle CLI-Fenster 
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in der dritten 
Dimension 


»Ray Tracer« heißt wörtlich übersetzt 
»Strahlenverfolger«. Wer aber glaubt, mit 
dem folgenden Programm könne er sei¬ 
nen Amiga als Geigerzähler elnsetzen, der 
irrt sich. Die Strahlen sind in unserem Fall 
harmloses Licht und verfolgt werden sie 
zur dreidimensionalen Darstellung. 






R ay Tracing« nennt man 
die perspektivische 
Darstellung von dreidi¬ 
mensionalen Objekten unter 
Berücksichtigung der Licht¬ 
strahlen. Was in diesem kurzen 
Satz an List und Tücke für den 
Programmierer steckt, wird erst 
vollends klar, wenn Sie sich ver¬ 
deutlichen, was dabei berück¬ 
sichtigt werden muß. 

So müssen nicht nur die Ab¬ 
messungen der Objekte (in un¬ 
serem Fall Kugeln) der Per¬ 
spektive entsprechend umge¬ 
rechnet werden. Es muß auch 
der Lichteinfall berücksichtigt, 
die Spiegelungen richtig darge¬ 
stellt (möglicherweise auf einer 
gekrümmten Oberfläche) und 
eventuell einzelne Flächen 
durchsichtig gemacht werden. 

Bei weniger leistungsfähigen 
Computern erweisen sich der¬ 
artige Programme oft genug als 
wahre »Rechenzeitkiller««, die 
den Prozessor für erhebliche 
Zeit lahmlegen. Aber auch der 
Amiga - mit 68000er und dem 
Customchip Blitter sehr gut ge¬ 
rüstet - ist mit dieser Aufgabe 
stark gefordert. 

So kann die Berechnung ei¬ 
ner Grafik mit mehreren Ele¬ 
menten im Interlace-Modus 
durchaus zwei bis drei Stunden 
in Anspruch nehmen. Das heißt 
aber nicht, daß Sie sich einen 
zweiten Amiga kaufen müssen, 
weil Ihrer mit Raytracing dem¬ 
nächst ausgelastet ist. Es gibt 
einige Möglichkeiten, die Aus¬ 
gabe zu beschleunigen oder 
notfalls abzubrechen. 

Solange Sie an Ihrer Grafik 
noch Änderungen vornehmen, 
sollten Sie grundsätzlich im 
»Low-Resolution««-Modus arbei¬ 
ten. Dieser ist etwa viermal so 
schnell wie der Interlace-Mo¬ 
dus. Eine erhebliche Verkür¬ 
zung der Rechenzeit bietet die 
Berechnung im »Test<«-Modus. 
Diese stellt die Grafik im Brief¬ 
markenformat dar. Sie brau¬ 
chen auf eine Grafik nur wenige 
Minuten warten, für die sonst ei¬ 
nige Stunden nötig wären. 

Wollen Sie weitere Rechen¬ 
zeit einsparen, ziehen Sie ein¬ 
fach während des Bildschirm- 
aufbaus den Screen nach un¬ 
ten (oder stellen im Menü »ver¬ 
deckt«« ein). Sie müssen aller¬ 
dings darauf achten, den 
Screen wieder ganz nach oben 
zu ziehen, bevor Sie mit »Win¬ 
dow ändern«« die Einstellungen 
bearbeiten. Denn dieser Menü¬ 
punkt öffnet ein eigenes Fen¬ 
ster, das sich nur durch ein 
Gadget am unteren Rand be¬ 
seitigen läßt. 

Sollten Sie Ihren Amiga zwi¬ 
schendurch für dringende an¬ 
dere Aufgaben benötigen, so 
können Sie die Berechnung mit 


Grafik 


einem einfachen Mausklick an 
einer beliebigen Stelle des 
Screens abbrechen. Speichern 
Sie jetzt den derzeitigen Stand 
der Grafik. Wenn Sie weiterma¬ 
chen wollen, laden Sie diese 
und arbeiten an derselben Stel¬ 
le weiter. 

Leider ist es uns aufgrund 
der Länge dieses Programms 
nicht möglich, das Listing abzu- 


Bi Idschimnitte X 

Y 
Z 

Bl ickx*ichtun 4 gr X 

Y 
Z 

BiIdsohIrHabstand 
Brechun^rszati 1 

KuerelnuHHer [RET] 

DurohHesser 
Kuffelposition X 

Y 
Z 

Sp/Gl/Li <1/2/3> 
Kusral löschen (t> 


drucken. Der Raytracer ist nur 
auf unserer Programmservice- 
Diskette enthalten, die Sie mit 
der Karte auf Seite 34 bestellen 
können. Dort finden Sie selbst¬ 
verständlich auch den doku¬ 
mentierten Sourcecode zu die¬ 
sem Programm. 

Starten Sie den Raytracer 
entweder vom CLI mit »rt«« und 
< RETURN > oder von der 
Workbench per Doppelklick auf 
das Icon. Sie sehen jetzt einen 
neuen Screen mit der Titellei¬ 
ste. Drücken Sie die rechte 

Programm- 

Service 

Maustaste, dann sehen Sie vier 
Menüs; »RayTracer««, »Auflö¬ 
sung««, »Berechnen«« und »Ex¬ 
tras««: 

Auflösung: Wählen Sie den 
Punkt »High«« an, so wird der 
Bildschirm auf »High-Resolu- 
tion«« und Interlace umgestetit 
(640 X 512 Punkte). 

Bevor Ihnen vom Flackern 
die Augen schmerzen, schalten 
Sie lieber zurück (mit dem Me¬ 
nüpunkt »Low««). Der Bildschirm 
sollte jetzt wieder die normale 
Auflösung von 320 x 256 Punk¬ 
ten haben. 

Berechnen: Hier finden Sie 
die beiden Punkte »Test«« und 
»Start««. Bitte zügeln Sie vorerst 
Ihre Neugier und lassen Sie 
den Punkt »Start«« links liegen. 
Dieser bringt längere Wartezei¬ 


ten mit sich. Starten Sie statt 
dessen einen »Test««-Lauf. Die¬ 
ser berechnet - weil noch keine 
Objekte definiert wurden - in 
wenigen Sekunden die Grafik. 
Sie sehen jetzt in der linken 
oberen Ecke eine Grafik im 
Briefmarkenformat, die ein rot¬ 
grünes Schachbrettmuster und 
einen schmalen blauen Strei¬ 
fen als Horizont anzeigt. 


e.eeeeee 
e.000000 

17.999999 

5.000000 

10.000000 

-2.600000 

0.280000 

2.560000 

» 
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« 
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3 
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Natürlich ist es nicht Sinn ei¬ 
nes Raytracers, eine Flach¬ 
landsilhouette mit Schachbrett¬ 
muster auf den Bildschirm zu 
zaubern. Dafür gibt es weit an¬ 
spruchslosere Programme. 

Extras: Gehen wir also dar¬ 
an, das erste Objekt zu definie¬ 
ren. Zu diesem Zweck wählen 
Sie im Menü »Extras«« den 
Punkt »W. ändern««. Sie sehen 
ein neues Fenster (Bild 1), in 
dem Sie alle wichtigen Parame¬ 
ter einstellen. 

Sie sehen an der aktuellen 
Einstellung, daß ein Objekt be¬ 
reits definiert ist. Es handelt 
sich dabei um die Kugel mit der 
Nummer Null, die als Lichtquel¬ 
le dient. Sie können die Position 
dieser Lichtquelle ändern, in¬ 
dem Sie mit der Maus zweimal 
auf die entsprechenden Werte 
klicken und diese editieren, so- 
bajd der Cursor auftaucht. 

Ähnlich gehen Sie vor, wenn 
Sie eine neue Kugel plazieren 
wollen. Klicken Sie zweimal auf 
die Nummer der Kugel (im Mo¬ 
ment »0««) und tragen Sie dort 
eine Eins ein. Diese Änderung 
wird allerdings erst akzeptiert, 
wenn Sie mit einem Klick auf 
das Feld »[RET]«« bestätigen. 
Sie sehen jetzt die aktuellen 
Maße Ihrer neuen Kugel ange¬ 
zeigt, nämlich fünf Nullen. Ge¬ 
ben Sie ihr neue Werte, indem 
Sie die alten wie oben beschrie¬ 
ben ändern. Achten Sie darauf, 
daß Sie am Anfang Werte ein¬ 


tragen, die im darstellbaren Be¬ 
reich liegen - später können Sie 
immer noch experimentieren. 

Wir schlagen vor, daß Sie fol¬ 
gende Startwerte eintragen: 
Durchmesser 50, X-Position 50, 
Y-Position 100, Z-Position 200 
und bei »Sp/Gl/Li<« eine 2. Der 
letzte Wert unterscheidet zwi¬ 
schen spiegelnder (1) und glat¬ 
ter (2) Oberfläche beziehungs¬ 
weise einer Lichtquelle (3). 
Klicken Sie mit der Maus jetzt 
auf »[RET]««, um die neuen Ein¬ 
stellungen zu bestätigen und 
danach auf das »ok<«-Gadget 
am unteren Bildschirmrand. 

Wenn Sie jetzt noch einmal 
»Test«« anwählen, sehen Sie die 
Grafik mit Ihrer neu definierten 

Die erste eigene 
»Landschaft« 

Kugel am rechten Rand. Außer¬ 
dem dürfte Ihnen aufgefallen 
sein, daß die Berechnung der 
Grafik jetzt deutlich mehr Zeit in 
Anspruch nimmt. 

Um einen ersten Eindruck zu 
erhalten, sollten Sie Ihren Ami¬ 
ga vielleicht für zwei bis drei 
Stunden »beschäftigen««. Stel¬ 
len Sie den Interlace-Modus ein 
(mit »Auflösung««/»High««), star¬ 
ten Sie die Berechnung (mit 
»Berechnen««/»Start««) und zie¬ 
hen Sie den Screen ganz nach 
unten. Der Lohn des Wartens 
ist eine Grafik, die zwar leicht 
flackert (wegen Interlace), aber 
immerhin einen kleinen Ein¬ 
druck von der Leistungsfähig¬ 
keit des Amiga vermittelt. Wenn 
Sie alles genau befolgt haben, 
sollte das Bild etwa so ausse- 
hen, wie das Foto im Inhaltsver¬ 
zeichnis, das bei unseren er¬ 
sten Versuchen entstand. 

Wenn Sie nach diesem Vor¬ 
geschmack Lust zum Experi¬ 
mentieren bekommen haben, 
steht dem nichts mehr im We¬ 
ge. Sehen Sie sich den Menü¬ 
punkt »W. ändern« etwas ge¬ 
nauer an. Sie finden unter an¬ 
derem Möglichkeiten, Ihren 
Blickwinkel (unter »Blickrich¬ 
tung««), den Abstand vom Ort 
des Geschehens (mit »Bild¬ 
schirmabstand«) und die Bre¬ 
chungszahl zu verändern. Ex¬ 
perimentieren Sie mit diesen 
Werten. Wenn Sie eine Einstel¬ 
lung gefunden haben, die Sie 
vollkommen zufriedenstellt, 
können Sie diese mit »E. si¬ 
chern« speichern. Das Pro¬ 
gramm legt eine Datei »RTWer- 
te« an, aus der beim nächsten 
Start die Voreinstellungen ge¬ 
holt werden. 

RayTracer: Auf ähnliche Art 
können Sie fertige Grafiken 
speichern und wieder laden. 
Die entsprechenden Menü¬ 
punkte finden Sie unter »Ray- 


- Ray T»‘ÄCei' 


OK 


Bild 1. Mit dem Menüpunkt »W. ändern« stellen Sie alle 
wichtigen Daten für Ihre Grafik ein 
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tracer« (»Laden« und »Saven«). 
Beide verzweigen in einen File- 
requester, der nur Directories 
oder selbstgespeicherte Grafi¬ 
ken erkennt. Dabei wird hinter 
jedem von Ihnen gewählten Na¬ 
men entweder »-1« (wenn es 
sich um eine Low-Resoiution- 
Grafik handelt) oder »-h« ange¬ 
hängt. Diese Erweiterung kön¬ 
nen Sie beim Speichern eben¬ 
so wie beim Laden weglassen. 


Mit dem dritten Menüpunkt 
(»Ende«) sollten Sie vorsichtig 
umgehen. Er respektiert Ihren 
Wunsch und reagiert prompt, 
ohne vorher zu fragen, ob Sie 
nicht noch speichern wollen. 

Neben den bereits bespro¬ 
chenen Menüpunkten können 
Sie im »Extras«-Menü die Titel¬ 
leiste ein- und ausblenden, ein 
Countdown-Fenster einrichten, 
das Sie informiert, wieviele Zei¬ 


len noch dargestellt werden 
müssen, und den aktuellen 
Screen sichtbar beziehungs¬ 
weise unsichtbar machen. 
Auch diese Einstellungen wer¬ 
den in RTWerte gespeichert, so 
daß sie nicht jedesmal neu defi¬ 
niert werden müssen, sondern 
automatisch beim Start gela¬ 
den werden. 

Mit den Informationen aus 
diesem Artikel und etwas Expe¬ 


rimentierfreude sollten Sie in 
der Lage sein, fantastische 
Grafiken auf den Bildschirm zu 
zaubern. Wenn Sie mehr über 
die theoretischen Grundlagen 
wissen wollen, empfehlen wir 
das Buch »3-D-Grafik-Program- 
mierung« von Data Becker. 

(Arno Gölzer/so) 

3-D-Graflk>Programmlerung; Jennrich, Mass- 
mann, Schulz; Data Becker; 284 Selten; ISBN 
3-8901M74-2: Preis 59 Mark 


Sounds im 


Mit dem »Sound-Effekte-Editor« 
erTeugen Sie komfortabel 
alle Geräusche. Vom einfachen 
akustischen Hinweis auf 
Eingabefehler bis zum Kanonen¬ 
donner in Spielen reicht das 
Spektrum. Der Clou: Die Sounds werden 
als Quellcode gespeichert und 
sind so leicht für eigene Programme 
zu verwenden. 




W enn auf dem Mond 
riesige Meteore ein- 
schlagen und dabei 
gewaltige Krater hinterlassen, 
so geschieht das vollkommen 
lautlos. Schuld daran ist die feh¬ 
lende Lufthülle. Der Schall ist 
eine hörbare oder zumindest 
nachweisbare Schwingung, die 
sich nur in einem Medium, bei¬ 
spielsweise in der Luft oder im 
Wasser, verbreitet. Jedes Ge¬ 
räusch hat seine eigene, indivi¬ 
duelle Schwingung und kann 
daher eindeutig identifiziert 
werden. Aber auch eine — zu¬ 
mindest annähernde — mathe¬ 
matische Beschreibung ist 
möglich. Wir unterscheiden 
zwischen vier Grundschwin¬ 
gungen: 

- Sinus 
- Rechteck 
- Dreieck 
- Sägezahn 

Die Klangfarbe eines Tones 
machen aber im wesentlichen 
die sogenannten Oberschwin¬ 
gungen aus. Es handelt sich 
um mehr oder weniger große 
Abweichungen von der eigentli¬ 
chen Wellenform. Der Amiga 
läßt uns in bezug auf das Aus¬ 
sehen der Wellenform völlig 
freie Hand. Somit ist es mög¬ 
lich, beliebige Geräusche 
künstlich zu erzeugen - wir 
müssen nur die Wellenform ent¬ 
sprechend beschreiben. Diese 
Aufgabe wird mit dem Sound- 


Effekte-Editor (SEEd)(Listing 1) 
zum Kinderspiel. 

Nach dem Eingeben des 
Programms mit dem Check¬ 
summer (Seite 159) und dem 
Compilieren starten Sie SEEd 
vom CLI aus, indem Sie den 
Programmnamen eingeben 
und < RETURN > drücken. 
Haben Sie ein Programm-Icon 
für SEEd entworfen, können 
Sie den Soundgenerator auch 
von derWorkbench aus starten. 
Wichtig ist in jedem Fall, daß 
sich im Verzeichnis »Libs« die 
Mathematik-Libraries befinden 
(mathtrans.library). 

Von der Welle 
zum Klang 

Nach dem Programmstart 
öffnet sich ein Fenster, das in 
zwei Felder unterteilt ist (Bild 1): 

1. Das Bedienungsfeld belegt 
das rechte Viertel des Bild¬ 
schirms. Es besteht aus insge¬ 
samt zwölf Reglern (Gadgets). 
Lesen Sie im folgenden deren 
Funktion: 


Großer Schieberegler links: 

Grobeinstellen der Fre¬ 
quenz. Schieben Sie den Re¬ 
gelknopf nach unten, wenn Sie 
niedrigere Frequenzen einstel¬ 
len möchten. 


Großer Schieberegler rechts: 

Feineinstellen der Frequenz. 
Mit den beiden Frequenzreg¬ 
lern können Sie über 65000 
Frequenzen einstellen! 

Kleiner Schieberegler links: 

Hier stellen Sie ein, wie oft 
der eingestellte Klang wieder¬ 
holt werden soll. 

Kleiner Schieberegler rechts: 

Die Lautstärke. 

Null: 

Wellenform auf Null stellen. 
Es erscheint ein waagerechter 
Strich im Editierfenster. 



Bild 1. Das SEEd-Fenster. Im linken Teil bearbeiten Sie den 
gewünschten Sound, rechts befinden sich alle Regler. 
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Listings 


Sinus: 

Einstellen der Weilenform 
auf Sinus. 

3Eck: 

Eine Dreieckschwingung 
wird eingestellt. 

SZahn: 

Vorwahl der Sägezahn¬ 
schwingung. 

REck: 

Die Rechteckschwingung 
einstellen. 

Die voreingestellten Schwin¬ 
gungen können jetzt beliebig 
verändert werden (siehe un¬ 
ten). Allerdings ist in diesem Zu¬ 
stand der Klang nicht immer op¬ 
timal. Verbessern Sie die Quali¬ 
tät, indem Sie mehrere Schwin¬ 
gungen im Zeichenfeld unter¬ 
bringen: 

Multi: 

Eingestellte Schwingung ver¬ 
doppeln. 

Save: 

»Geräusch« auf Diskette si¬ 
chern. Ein Requester öffnet 
sich. Geben Sieden Filenamen 
an und klicken Sie das Gadget 
mit der Aufschrift »Save« an 
(oder »Break«, wenn Sie lieber 
nicht speichern möchten). 

Quit: 

Mit diesem Schalter brechen 
Sie das Programm ab. 

Im weiß hinterlegten Zei¬ 
chenfeld können Sie vorgefetli- 
ge Schwingungen verändern 

Sounds zeichnen 
mit der Maus 

oder aber völlig neue entwer¬ 
fen. Drücken Sie die linke 
Maustaste und »zeichnen« Sie 
Ihren Soundeffekt. Die besten 
Ergebnisse erhalten Sie, wenn 
Sie die Höhe des Zeichenfeldes 
möglichst voll ausnutzen. Im 
anderen Fall sind die Schwin¬ 
gungen nur schlecht hörbar. 

Weiterhin ist es von Vorteil, 
wenn Schwingungsanfang und 
-ende auf gleicher Höhe liegen. 
Nutzen Sie auch hier die Multi- 
Funktion zur Verbesserung der 
Soundqualität. Sie hören den 
Klang, wenn Sie die rechte 
Maustaste betätigen. Bei den 
Grundschwingungen ist aller¬ 
dings selten ein Ton zu hören. 
Keine Angst, das Programm 
funktioniert trotzdem fehlerfrei. 
Verdoppein Sie die Grund¬ 
schwingung mehrfach, ent¬ 
locken Sie dem Amiga bereits 
einen Klang. 

Begrenzen 
der Wellenform 

Mit den orangefarbenen Mar¬ 
kierungen im Zeichenfeld kön¬ 
nen Sie den Anfang und das 
Ende der Wellenform selbst 
festlegen. Bedienen Sie die 


Markierungen mit dem Ziffern- 
Block der Tastatur: 

<7> Startmarkierung nach 
links, 

<9> Startmarkierung nach 
rechts, 

<8> Startmarkierung auf 
Start. 

Da das Datenfeld auf einem 
Langwort (Longword) beginnen 
muß, erfolgt die Bewegung der 
Startmarkierung in 4er* 
Sprüngen. 

<4> Endemarkierung nach 
links, 

Einbindung in 
C-Programme 

<6> Endemarkierung nach 
rechts, 

<5> Endemarkierung auf 
Ende. 

Das Ende des Datenfeldes ist 
nicht an bestimmte Speicher¬ 
bereiche gebunden. Daher ist 
hier noch eine Feineinstellung 
in Einerschritten möglich: 

<1> Endemarkierung einen 
Schritt nach links, 

<3> Endemarkierung einen 
Schritt nach rechts, 

<2> Endemarkierung auf 
Ende. 

Das Einbinden eines SEEd- 
Sounds in C-Programme ist 
sehr einfach, da SEEd den 
Sound als C-Quellcode ablegt. 
Folgende Schritte sind nötig: 

- Binden Sie die SEEd-Datei 
als Headerfile in Ihr eigenes 
Programm ein. 

> Rufen Sie zu Beginn Ihres ei¬ 
genen Programms die Funktion 
SoundOnO auf. Die Funktion 
liefert im Fehlerfall den Wert 1. 

Ihr Sound ist nun initialisiert 
und Sie können ihn jederzeit 
und beliebig oft abspieien: 

- »PlayO« spielt den Soundef¬ 
fekt ab. 

- Rufen Sie vor Beendigung 
Ihres Programms die Funktion 
»SoundOffQ« auf. Sie gibt alle 
für den Soundeffekt notwendi¬ 
gen Ressourcen wieder frei. 

PlayO und SoundOffQ liefern 
keinen Wert. 

Hier ein kleines Beispiel: 

#include "SoundName" 

main() 

[ 

if(ISoundOn())[ 

PlayO; 

SoundOffO; 


Aztek-C-Besitzer übersetzen 
dieses Beispiel so: 
cc NAME.c +L 
ln NAME.o -lc32 

Anstelle von »NAME« muß 
natürlich der Name Ihres Pro¬ 


gramms stehen. Programmie¬ 
rer anderer Programmierspra¬ 
chen profitieren immer noch 
von den gesicherten Soundda¬ 
ten. Deshalb enthält Listing 2 
für den Interessierten zum 
Schluß noch das dokumentier¬ 
te Listing einer SEEd-Sound- 
datei. Mit dem SEEd geben wir 


Ihnen ein wertvolles Werkzeug 
zur Erzeugung von Sounds in 
eigenen Programmen in die 
Hand. Ein Werkzeug, das die 
Soundprogrammierung unge¬ 
mein erleichtert und das Sie be¬ 
stimmt bald nicht mehr missen 
wollen. 

(Arno Gölzer/rs) 


Programmname: SEEd 

Computer: A500, A1000, A2000 mit Kickstart 1.2 
Sprache: C 
Compiler: Aztek V3.4 

Aufrufe: cc SEEd.c +L 
_ In SEEd.o -Ic32 

Bemerkung: benötigt Math.-Libraries 


Programmautor: Arno Gölzer 





1 zOO 

/• 


2 pt 

»• Gölzy's SEEd.o 


3 PR 

»• 08.88 


4 7W 

V 


5 gf 

#lnelude <math.h> 


6 FQ 

#lnclude <stdlo.h> 


7 A4 

#lnclude <exec/types.h> 

6 WI 

#lnclude <intultion/intuitlon.h> 

9 ne 

#lnclude <graphic8/gfx.h> 

10 ny 

#include <devlees/audlo.h> 

11 IN 

#include <exea/raemory.h> 

12 Yk 

#deflne OH (OxFFFF/255) 


13 xt 

#deflne GL (OxFFFF/255) 


14 IC 

#deflne GC (OxFFFF/64) 


15 9p 

#define GV (OxFFFF/64) 


16 Og 

#define ENDE (((Ende-Start)/2}+l) 

17 7L 

#define HOUSX (wln->«0U8eX) 

18 EU 

#define MOUSY (win->Mou8eY) 

19 LF 

#deflne GAD.ID (((atmet Gadget »)ADDR)->GadgetID) 

20 sa 

APTR ADDR; 


21 7L 

ULONG CLASS, CODE; 


22 ¥5 

UBYTE *Data,buffer=15,narae[31],undo[31],Titel[]x(üBYTE »)'- 


*- Gölzy's SEEd 


23 Hn 

UWORD l,h,p,c,v; 


24 3cA 

atmet Image HDuinmy,LDumaiy,CDuinniy,VDumray; 

25 Xa 

SHORT Start»0,Ende»510} 


26 85 

SHORT 0Kpaira[] .( 

0,0» 6l»0, 61»21, 0,21, 0,0 j; 

27 fl 

SHORT Reqpalr8[] »| 

0,0» 246»0» 246,67, 0,67, 0,0 j; 

28 cy 

SHORT Spairs[] .{ 

0,0» 210,0» 210,11, 0,11» 0,0 i; 

29 2r 

atmet Border OKRand «[ 

-1» -1» 1,0, JAMl, 5,&OKpair3[0]» 


MULL ; 


30 uS 

stmet Border ReqR »[ 

NULL ; 

2, 1» 1,0» JAHl, 5»6ReqpairsC0], 

31 PO 

atmet Border SRand =( 

NUU ; 

-1, -2, 1,0, JAMl, 5,&Spalra[0]» 

32 Gp 

atmet IntulText 0KT2 *{ 
',NUU ; 

1,0,JAM1»14»6,NULL,(UBYTE *)'QUIT 

33 Bl 

atmet IntuiText 0KText={ 
',&0KT2 J; 

3,0,JAMl,15»7,NULL,(UBYTE »)'(3UIT 

34 ZN 

stmet IntulText SaText=( 
'»NULL ; 

1»0,JAM1»14,6»NULL»(UBYTE »)'Save 

35 XW 

atmet IntulText MText =( 
i'.NULL 1; 

1,0,JAMl,10,6»NULL,(UBYTE »)'Mult 

36 Oh 

atmet IntulText RText ={ 
'»NULL ; 

l,0»JAMl,l4»6,NUU,{UByTE »)'REck 

37 6G 

atmet IntuiText ZText =( 
n'.NULL Jj 

l»0,JAMl»10,6»NULL»(UByTE »)'SZah 

38 86 

atmet IntulText DText =( 
'»NULL ; 

1»0,JAM1»14»6»NULL»(UBYTE »)'3Eck 

39 fliA 

atmet IntuiText SText =( 
s',NULL ); 

l,0»JAMl,10,6,NULL,(UByTE »)'Sinu 

40 fA 

atmet IntuiText NText =[ 

l»0,JAMl»l4,6»NUU»(UBnE 

Listing 1. Mit dem Sound-Effekte-Edltor (SEEd) 
entwerfen Sie Geräusche mit der Maus 
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41 aL struct IntuiText ReqT2 =( 1,0,JAM1,45,6,NULL,Titel,MULL 

); 

42 yx struct IntuiText ReqT »{ 3,0,JAMl,46,7,NULL,Titel,&ReqT2 

1; 

43 13 struct IntuiText RCaT =( 1,0,JAM1,10,6,NULL,(UBYTE »)'Brea 

k',NULL j ; 

44 FC struct IntuiText RTGT 1,0,JAHl,70,-10,NULL,(UBYTE *)'Fil 

ename: '',NULLj j 

45 qZ struct Proplnfo PHInfo =l FREEVERTl AUTOKNOB,O,0, 0,GH,0 

,0,0,0,0,0 ]; 

46 V7 struct Proplnfo PLInfo ={ FREEVERTl AOTOKNOB,0,GL*255,0,GL,O 

,0,0,0,0,0 i; 

47 Vw struct Proplnfo CInfo =( FREEVERTlAUT0KN0B,0,GC*64, 0,GC,0 

,0,0,0,0,0 1 ; 

48 be struct Proplnfo VInfo FREEVERTl AUTOKNOB,0,0, 0,GV,0 

,0,0,0,0,0 i! 

49 9C struct Stringinfo Slnfo=( name,undo,0,31,0,0,0,0,0,0,0,0,NU 

LL 1 j 

50 uM struct Gadget RTGad »[ NULL,20,30,210,10,GADGHC0MP, 

51 cU4 GADGIHMEDIATElRELVERIFY,STRGADGETlREQGADGET, 

52 Wb (APTR)8cSRand,NULL,iRTGT,0,{APTR)8iSlnfo,l4,NULL 

); 

53 6d0 struct Gadget RCa »( 4RTGad,20,45,60,20,GADGHCOMP, 

54 oc4 ENDGAr)GETlGADGIMHEDIATElRELVERIFY,BOOLGADGETlREQGADGET, 

55 e4 (APTR) SOKRand,NULL,SRCaT,0,0,13,NULL 

]i 

56 weO struct Gadget ROk ={ &RCa,170,45,60,20,GADCHCOMP, 

57 rf4 ENDGADGETiGADGIMMEDIATElRELVERIFY.BOOLGADGETlREQGADGET, 

58 W3 (APTR)WKRand,NULL,aSaText,0,0,12,NULL 

59 lauO struct Gadget OKGad NULL,579,235,60,20,GADGHCOHP, 

60 r84 GADGIMMEDIATElRELVERIFY,B00LGADGET, 

61 JP (APTR)feOKRand,NULL,&0KText,0,0,11,NULL 

); 

62 6d0 struct Gadget SaGad *( iOKGad,579,211,60,20,GADGHCOHP, 

63 uB4 GADGlMMEDIATElRELVERIFY.BOOLGADGET, 

64 Uz {APTR)&OKRand,MULL,&SaText,0,0,10,NULL 

}i 

65 MOO struct Gadget MCad =[ iSaGad,579,187,60,20,GADGHCOHP, 

66 xE4 GADGIMHEDIATEl RELVERIFY,BOOLGADGET, 

67 TV (APTR)&0KRand,NULL,SMText,0,0,9,NULL 

!; 

68 MaO struct Gadget RGad »j &MGad,579,163,60,20,GADGHCOHP, 

69 0H4 GADGIHMEDIATElRELVERIFY,BOOLGADCET, 

• 70 ek (APTR)8iOKRand,NULL,&RText,0,O,8,NULL 

)J 

71 fVO struct Gadget ZGad »[ &RGad,579,139,60,20,GADGHCOHP, 

72 3K4 GADGIHHEDIATElRELVERlFY.BOOLGADGET, 

73 v8 (APTR)&OKRand,MULL,&ZText,0,0,7,NULL 

)5 

74 cuO struct Gadget DGad *( &ZCad,579,115,60,20,GADGHCOHP, 

75 6N4 GADCIHMEDIATElRELVERIFY,BOOLGADGET, 

76 E4 (APTR)&OKRand,MULL,iDText,0,0,6,NULL 

)5 

77 RsO struct Gadget SCad »( &DGad,579,91,60,20,GADGHCOHP, 

78 9Q4 GADGIMHEDIATEl RELVERIFY,BOOLGADGET, 

79 j n (APTR*) ftOKRand, NULL, &SText, 0,0,5, NULL 

)5 

80 vyO struct Gadget NGad ={ &SGad,579,67,60,20,GADGHCOHP, 

81 CT4 GADGIMHEDIATEl RELVERIFY.BOOLGADGET, 

82 aY (APTR) «lOKRand, NULL, &NText, 0,0,4, NULL 

)> 

83 YsO struct Gadget VGad ={ &NGad,608,0,30,64,0,0,PROPGADGET, 

84 el4 (APTR)&VDumroy,NULL,NULL,0,(APTR)&VInfo,3,NUU 

)5 

85 SDO struct Gadget CGad =( WGad,577,0,30,64,0,0,PROPGADGET, 

86 p04 (APTR)&CDuimiiy,NULL,NULL,0,(APTR)6CInfo,2,NULL 

]; 

87 H30 struct Gadget PGadL ={ &CGad,546,0,30,256,0,0,PR0PGAD0ET 

88 QH4 (APTR)&LDunuiiy,NULL,NULL,0,(APTR)iPLInfo,l,NULL 

]J 

89 ulO struct Gadget PGadH =( &PGadL,515,0,30,256,0,0,PROPGADGE 

T, 

90 rio 4 (APTR)iHDummy,NULL,NULL,0,(APTR)8tPHInfo,0 ,null 

i; 

91 jlO struct Requester Req={ NULL,10,10,250,70,0,0, 

92 KC4 MlOk,iReqR,&ReqT,0,0,NULL,NULL,NULL,MULL,NULL 

); 

93 aOO struct NewWlndow BW =( 

94 Gw4 0,0,640,256,-1,-1,VANILLAKEYl MOUSEBUTTONSl GADGETUP, 


ACTIVATEl BORDERLESSl RMBTRAP,8iPGadH,NULL,NULL,NULL,NULL, 
0,0,0,0,WBENCHSCREEN 


97 w40 struct Library 

98 Kq struct IntuiMessage 

99 bl struct HsgPort 

100 oq struct Device 

101 vE struct IntuitlonBase 

102 3D struct GfxBase 

103 Ns struct HathTransBase 

104 Np struct Window 

105 Ls struct RastPort 

106 yO struct lOAudio 

107 Bd VOID elosewO 

sourcen freigeben »/ 


lf(!SDev) 

if(SPort) 

t)); 

if(Data) 

if(win) 


»OpenLlbraryO; 

»GetMsg {)! 

*SPort,»CreatePort(); 
»SDev,*OpenDevice(); 
•IntuitlonBase; 

•GfxBase; 

•HathTransBase; 

•win,»Open¥lndow(); 

*RP; 

Sound; 

/• zum Programmende alle Re 


CloseDevlce(&Sound); 
DeletePort(SPort,sizeof(struct HsgPor 


111 iu if(Data) 

112 C3 If(win) 

113 sS if(HathTri 

114 de if(GfxBasi 

115 LA lf(Intuit 

116 Jh exit(O); 

117 tOO ) 

118 6H VOID openwO 

w, ChipMemory 

119 rK ( 

120 zl4 UBYTE •Al 

121 GP lf(!(Intu 

122 BuC 0 


if(Data) FreeMem(Data,256*alzeof(UBYTE)); 

If(win) CloseWindow(wln); 

if(HathTransBase) CloseLibrary(HathTransBase); 
if(GfxBase) Cl08eLlbrary{GfxBa8e); 

If(IntuitionBase) CloseLlbrary(IntuitionBase); 
exit(O); 


/• Progranunstart: Libraries, Wlndo 


120 zl4 UBYTE •AllocHetnO; 

121 GP lf(!(IntultionBa8e«(struct IntuitionBase *) 

122 BuC OpenLibrary('lntuition.llbrary',0))) dose 

w(); 

123 KB4 if(l(0fxBa8e=(struct GfxBase ») 

124 sVC OpenLibrary('graphic8.11brary',0))) dose 

w()5 

125 h24 if(l(MathTran8Bases(struct HathTransBase •) 

126 foC OpenLibrary("mathtrans.library',0))) dose 

w()j 

127 6U4 lf(!(wln«OpenWindou(S:BW))) dose 

w(}; 

128 hE lf(l(Data»AllocMeni(256»slzeof(UBYTE),MEMF.CHIP))) dose 

w(); 

129 ZV if(!(SPort«CreatePort("SPort",0))) dose 

w(); 

130 Tz Sound.ioaJequest.iO-Message.mnJleplyPort »SPort; 

131 uS Sound.loa_Request.lo_Message.ran_Node.ln_Prl»10; 

132 08 Sound.loa_Data a&buffer; 

133 Rd Sound.ioa_Length=(üL0N0)slzeof(buffer); 

134 FO lf(SDev=0penDevlce(AUDI0NAME,0,&Sound,0)) dose 

«()} 

135 17 Sound. loa_Request. lo_CoiiUEand»CHD_WRITE; 

136 QU Sound.ioa_Request.io_Flags =ADI0F_PERV0Ll I0F_QUICK; 

137 BV RP «wln->RPort; 

138 EJO ) 

139 Jz ULONG GetHessageO /• «es 

sagePort auslesen »/ 

140 Cf [ 

141 yg4 struct IntuiMessage »tnes; 

142 Ko CLASS=C0DE=0; 

143 KE ADDR=NULL; 

144 yD lf(nies=GetHsg(wln->UserPort))( CLASS=mes->Class 


145 VPf 

146 xs 

147 NT 

148 0t4 1 

149 NO retum(CLASS); 

150 QvO ) 

151 Eh VOID SetPolnt(x,y) 

chenfeld ausgeben •/ 

152 8f4 SHORT x; 

153 Ky UBHE y; 


CLASS=mes->Class 

CODE=mes->Code; 
ADDR=ines- > lAddres 
e; 

ReplyMsg(ine8); 


/» Punkt (Incl. Linie) im Zei 


152 8f4 

153 Ky 

154 QtO 

155 Gni4 

156 hE 

157 6E 

158 90 

159 4R 

160 Pe 

161 yb 


SHORT cd; 

ool=2»((x==Ende)l I (x==Start)); 
Data[x/2]=127-y; 
SetDrMd(RP,JAMl); 
SetAPen(RP,l+col); 
Move(RP,x,0); 

Draw(RP,x,255); 
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L 


ISTINGS 


162 91c 

163 Es 

164 RG 

165 xG 

166 OQ 

167 hCO 

168 J3 

169 f8 

170 oP4 

171 3S 

172 0* 

173 JZ 

174 21 

175 3Q 

176 RV 

177 rMO 

178 4d 

179 pl 

180 9M4 

181 xL 

182 d7 

183 qU 

184 HX 

185 HX 

186 u4 

187 gL 

188 2X0 

189 aS 

190 OT 

191 Xv2 

192 EU 

193 HZ 

194 eQ 

195 tR5 


/* neue Werte für Perlod, Cyole 


200 Pq 

201 RA9 

202 11 

203 SO 

204 uJQ 

205 Jo9 

206 Kp5 

207 Rn 

208 de 


Move(RP,x+l,0); 
Draw(RP,x+l,255)j 
SetAPen(RP, 2); 
WritePixel(RP,x,y); 
WrltePlxel{RP,x+l,y); 

i 

VOID NewM() 
und Volume lesen */ 

{ 

l=PLInfo.VertPoVGLi 

hsPHInfo.VertPot/GHj 

p=256»h+l; 

p=(p<124?124:p); 

e=64-CInfo.VertPot/GC; 

c=(c.=071:c); 

v=64-VInfo.VertPot/GV; 


PlayO 

* Klang abspielen */ 

( 

NewWOj 

Sound.loa_Data =D8ta+Start/2; 

Sound.loa_Length*ENDE{ 

Sound.ioa_Perlod=p; 

Sound.ioa_Cycle8=c; 

Sound. loa_Volunie=v{ 

BeginIO(&Sound}; 

WaitIO(&Sound); 

i 

VOID SaveO 

( 

COUNT IJj 
FILE «flle} 

NewW{); 

if (f lle=fopen(najne, "w *}) ( 

fprintf(flle,7» ^s - erstellt mit CSlzy's SEEd 

i^AnXn'.naine); 

fprlntf(flle,"#inolude < devloes/audlo.h>\n '); 
fprlntf(flle, '# inolude <exeo/memory.h>\n')j 
fprlntf(flle, "#deflne Play()j BeglnI0(8tSound)j UaltIO 
{SSound) ;\n\n'); 

fprlntf(flle, "UBnE buffer=15,»SData,SD[*d]»{\n\t",END 
E); 

for(i«Start/2,J.0ii<*Ende/2ji++,j++)( 
fprlntf(flle,'*3<a",Data[i])j 
if(ll=Ende/2) fprlntf(flle,j 

ifO-«15)( fprintf(file,'\n\t')j 

J»-l; 


fprlntf(file, An) ;\n')i 

fprintf(file,'extern struct HsgPort\t»CreatePort{);\n' 

); 

fprlntf{flle,"extern struct Devlce\t*OpenDevlce()j\n") 


fprintf{file, 
fprlntf(flle, 
fprlntf(flle, 
fprlntf(flle, 
fprlntf(flle, 
fprlntf(flle, 
uct MsgPort)) 
fprlntf(flle, 
ENDE); 

fprintf(file, 

fprintf(file, 

fprintf(file, 

fprintf(file, 

eturn(l)i\n', 

fprlntf(flle, 

;\n",ENDE); 

fprlntf(flle, 

n")j 

fprlntf(flle, 


'struct M8gPort\t\t*SPort;\n"); 

"struct Device\t\t*SDev;\n'); 

'struct I0Audlo\t\t Sound;\n\n"); 

"VOID Sound0ff()\n[\n')5 
Atif(lSDev)\tCloseDevice(&Sound);\n'); 
Atif(SPort)\tDeletePort(SPort,sizeof(8tr 
;\n'); 

Atlf(SData)\tFreeHem(SData,ltd) j\n]\n\n', 

"SHORT SoundOn()\n[\n"); 

AtüBTTE *AllooMeni()j\n')j 
AtCOUNT i;\n\n'); 

Atif(!(SData=AllocKem(*d,MEMF_CHIP)))\tr 

ENDE); 

Atfor(i=0;l<!{d;i++)\n\t\tSData[i]=SD[l] 
Atlf(! (SPortsCreatePort(\'SPort\",0)}){\ 
AtNtSoundOf f () ;\n\t\tretum(l) ;\n\t) \n") 


fprlntf (flle, AtSound.ioa_Reque8t.lo_Message.mn_ReplyP 
ort=SPort;\n"); 

fprlntf (flle, AtSound.ioaJiequest.ioJIessage.mnJiode.l 
n_Prl=10;\n"); 

fprlntf (flle, AtSound.loaJ3ata=&buffer;\n"); 
fprintf(file,AtSound.loa_Length=(üLONG)sizeof(buffer) 
An'); 

fprlntf(flle,Atlf(SDev=0penDevice(AUDI0NAME,0,&Sound, 
0})!\n"); 


229 ky 

fprintf(flle, At\tSoundOff();\n\t\treturn{l);\n\t]\n') 

230 gC 

fprlntf (flle, "\tSound.ioa_Request.lo_Coinmand\tsCMD_WRI 
TE;\n'); 

231 it 

fprlntf(flle,AtSound.loa_Request.lo_Flags\t=ADIOF_PER 
VOLl lOF.QUICKAn'); 

232 gf 

fprlntf(file,AtSound.loa_Data\t\t\t=SData;\n'); 

233 gn 

fprintf(file, AtSound.ioa_Length\t\t=*d;\n',ENDE); 

234 kz 

fprlntf (flle, AtSound.ioa.J»erlod\t\t=(UWORD)*d;\n',p); 

235 3U 

fprlntf (flle, AtSound.ioa_Volume\t\t»*d;\n',v); 

236 15 

fprlntf (flle, AtSound. ioa_Cyoles\t\t= (UWORD) *d An', e); 

237 F4 

fprlntf (flle, Atreturn(0);\nj \n'); 

238 07 

folose(flle); 

239 rM2 

J 

240 Jui 

elee DlsplayBeep(0)j 

241 tOO 

) 

242 9F 

VOID CheckReqO /» Reques 

ter kontrollieren */ 

243 rK 

( 

244 Hu4 

SHORT reqclear=0; 

245 UJ 

while(reqclears=0){ 

246 1W8 

GetMeseageO; 

247 4J 

if(CLASS==GAXETUP)[ 

248 610 

switoh(GAD_ID)( 

249 glC 

case 12:( 

250 JkK 

SaveO; 

251 Xk 

reqclear=l; 

252 z6 

break; 

253 5aG 

) 

254 or 

case 13 

255 boK 

reqclear*!; 

256 30 

break; 

257 9eG 

i 

258 WO 

defaultibreak; 

259 BgC 

1 

260 0h8 

) 

261 Di4 

1 

262 EJO 

i 

263 Vj 

VOID malnO 

264 Cf 

{ 

265 lf4 

SHORT x=0,y*0j 

266 pO 

BOOL ende*0; 

267 19 

COUNT l,j; 

268 mg 

FLOAT k; 

269 HO 

openw(); 

270 5t 

SetAPen(RP, 1); 

271 VO 

RectFill(RP,0,0,510,256); 

272 Ib 

for( 1=0; i< 512; l+=2) SetPoint(l,127); 

273 Nk 

whlle(lende)[ 

274 oge 

Walt(1< < Win->UserPort->mp_SlgBit); 

275 Uz 

GetHessageO; 

276 3h 

8witch(CUSS)( 

277 G7C 

case MOUSEBUnONS:( 

278 qOG 

if(CODE«=MENUDOWN)( 

279 TIK 

PlayO; 

280 Iq 

while(GODEI*MENUUP) GetHessageO; 

281 X2G 

] 

282 Ai 

eise if(CODE==SELECTDOWN){ 

283 fGK 

whlle(CODE!sSELECTUP)i 

284 d80 

GetHessageO; 

285 Om 

if((xl=HOUSX)ll (yI=M0USY))[ 

286 mtS 

x=H0USX; 

287 sl 

y=H0USY; 

288 XX 

lf(x<«510) SetPoint(2»(UBYTE)( 
(FLOAT)x/2.0},y); 

289 fAO 

] 

290 gBK 

1 

291 hCG 

) 

292 dm 

break; 

293 JEC 

} 

294 7h 

case GAMETUP:( 

295 rTH 

switch(GAD_ID)( 

296 EOL 

case 4:( /» Null »/ 

297 hOP 

for(i=0;i<512;i+=2) SetPolnt(l 

.127); 

298 js 

break; 

299 pKL 

] 

300 05 

case 5:1 /*>Sinus */ 

301 T6P 

for(j=0;j<2;J^-^){ 

302 IJT 

for(l=0;l<256;i+=2)[ 

Listing 1. (Fortsetzung) 
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303 DYX 

k=sqrt((FLOAT) ((256-i)«( 
256-i)+i»l)); 

304 ob 

lc=j7-k+128.0:k-128.0; 

305 nu 

SetPoint(i+256»j,(UBYTE)k) 

306 wRT 

! 

307 xSP 

) 

308 t2 

break; 

309 zUL 

1 

310 fu 

ease 6:( /* 3Eck */ 

311 dGP 

for(j=0jj<2;J-H-)( 

312 U2T 

for(i=J»256;l<128+J»256}i+»2) 

313 dyX 

k={FLOAT)l*.7; 

314 lY 

k=j?k+204.0:128.0-k; 

315 YQ 

SetPoint(i,(UBYTE)k); 

316 6bT 

1 

317 OV 

for( i»128+j »256; 1< 256+j »256; 1 
+=2)| 

318 i3X 

k»{FL0AT)l».7; 

319 Cz 

k=J7-k-28:k-52.0} 

320 dV 

SetPoint(i,(UBYTE)k); 

321 BgT 

] 

322 ChP 

} 

323 8H 

break; 

324 EJL 

) 

325 Z9 

case 7:( /» SZahn »/ 

326 sVP 

for(j=0;j<2;J^-i-)l 

327 JHT 

for(i»J *256;1<128+J *256;i+»2) 

328 tDX 

k».7»(FLOAT)(j »256+180-1); 

329 me 

SetPolnt(l,(UBYTE)k); 

330 KpT 

! 

331 cj 

for(i=128+j»256;l<256+j»256;l 

+»2)[ 

332 NWX 

k=.7»(FLOAT)(j »256+436-1); 

333 qi 

SetPolnt(i,(UBYTE)k); 

334 OtT 

) 

335 PuP 

1 

336 LU 

break; 

337 RwL 

) 

338 Ac 

caae 8:[ /» Reoheok */ 

339 51P 

for(j=0;j<2;J++)l 

340 ZvT 

for(i.J»256;l<128+J»256;l+*2) 

SetPolnl;(i,38); 

341 dl 

for(i«128+J*256;i<256+j»256;l 
+=2) SetPolnt(l,218)} 

342 WIP 

1 

343 Sb 

break; 

344 y3L 

) 

345 Bf 

case 9:1 /* 2mal »/ 

346 y2P 

for(i*j«0;i<256;l+»2,J++) Data[j] 
=Data[l]; 

347 Ce 

for(i=128;i<256;i++) Data[i] 

=Data[i-128]; 

348 Au 

for(l=0;l<512;l+=2) SetPolnt(i,(B 
YTE)(127-Data[i/2])); 

349 Yh 

break; 

350 e9L 

) 

351 8w 

case 10:( /» Save »/ 

352 feP 

Request(&Req,wln); 

353 zH 

CbeckReq(); 

354 dm 

break; 

355 JEL 

) 

356 MN 

case 11:[ 

357 NnP 

ende=l; 

358 hq 

break; 

359 nlL 

] 

360 Ae 

default:break; 

361 pKG 

) 

362 lu 

break; 

363 iHC 

1 

364 Vn 

case VANILLAKEY:( 

365 UwG 

switch(C0DE)j 

366 dUl 

case 49:{ /» Erde links */ 

367 bpP 

if((Ende>2)&&((Ende-2)>Start))( 

368 f5'I 

Ende-=2; 

369 mH 

SetPoint{Ende+2,(BYTE)(127-Dat 
a[(Ende+2)/2])); 

370 av 

SetPolnt(Ende,(BYTE)(127-Data[ 
Ende/2])); 

371 zUF 

! 




372 v4 

break; 

373 iwi 

■ J 

374 ie 

case 51:( /* Ende rechts »/ 

375 L7P 

lf(Ende<510)l 

376 b9T 

£nde+»2; 

377 CI 

SetPolnt(Ende-2,(BYTE)(127-Dat 
aC(Ende-2)/23)); 

378 13 

^etPoint(Ende,(BCTE)(127-Data[ 
Ende/2])); 

'379 7cP 

380 3C 

381 9eL 

1 

break; 

) 

382 Ok 

case 52:( /» Ende links schnell »/ 

383 dZP 

if((Ende>8)4&((Ende-8)>Start))l 

384 DJT 

Ende-=a; 

385 6J 

SetPolnt(Ende+8,(BYTE)(127-Dat 
a[(Ende+8)/2])); 

386 qB 

SetPoint(Ende,(BYTE)(127-DataC 
Ende/2])); 

387 FkP 

388 BK 

1 

break; 

389 HraL 

390 Ma 

1 

case 54:{ /• Ende rechts schnell »/ 

391 hdP 

if(Ende<506)l 

392 9nT 

Ende+»8; 

393 Wn 

SetPolnt(Endei8,(BYTE)(127-Dat 
a[(Ende-8)/2])); 

394 yJ 

SetPolnt(Ende,(BYTE)(127-Data( 

Ende/2])); 

395 NsP 

396 JS 

! 

break; 

397 PuL 

398 mN 

1 

case 50: 

399 iH 

case 53:{ /• Ende-Position */ 

400 OfP 

i«Ende; 

401 uP 

Ende»510; 

402 Mi 

S6tPolnt(i,(BYTE)(127-Data[i/2])); 

403 JD 

SetPoint(510,(BYTE)(127-Data[255]) 

404 Ra 

break; 

405 X2L 

406 Tc 

i 

case 55:( /* Start links »/ 

407 r2P 

if(Start>.8)( 

408 mPT 

Start-=8; 

409 3t 

SetPolnt(Start+8,(BYTE)(127-Da 
ta[(Start+8)/2])); 

410 vz 

SetPoint(Start,(BYTE)(127-Data 
[Start/2])); 

411 d8P 

412 Zi 

413 fAL 

i 

break; 

1 

414 Cp 

case 57:( /» Start rechts »/ 

415 jOP 

If ((Start < 504)&i( (Start+8) <Ende) 

)( 

4l6 qRT 

Start+=8; 

417 Z9 

SetPolnt(Start-8,(BYTE)(127-Da 
ta[(Start-8)/2])); 

418 37 

SetPoint(St8rt, (BHE) (127-Data 
[Start/2])); 

419 IGP 

420 hq 

421 nll 

J 

break; 

) 

422 Ng 

case 56:[ /» Start-Position */ 

423 08F 

i=Start; 

424 wE 

Start»0; 

425 j5 

SetPointd, (BYTE) (127-Data[i/2])); 

426 p8 

SetPoint(0, (BHE) (127-Data[0])); 

427 ox 

break; 

428 uPI 

429 Hl 

430 wRF 

1 

default:break; 

] 

431 sl 

break; 

432 yTC 

433 Lp 

434 OVi 

) 

default:break; 

) 

435 1W-! 

436 Is 

437 3YC 

i 

closewO; 

) 

(C) 1989 H&T 

Listing 1. (Schluß) 
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Listings 


#include <devices/audio.h> /* notwendige Headerfiles einbinden »/ 


for(l=0;i<56;l-H-) 

#include <exec/niemory.h> 


SData[l]=SD[i]; /* Daten ins Chipmemory kopieren »/ 

#define Play{); BeginI0{&Sound); WaitI0(&Sound)j /* 


if(l{SPort=CreatePort( 'SPort*,0))) 

Abspielen des Sounds »/ 


1 /» Antwortport kreieren */ 

UBYTE buffer=15,*SData,SD[563= 


SoundOffO; 
return(l); 

[ /* globale Variablen und Sounddaten (hier 56)»/ 


j 

1, 1, 13, 18, 24, 29, 35, 41, 46, 52, 57, 63, 69, 74, 80, 85, 


Sound.ioa_Request.iojiessage.ran_ReplyPort=SPort; 

168,173,179,185,190,196,201,207,213,218,224,229,235,241,246,252, 


/» Portsuweisung »/ 

1, 7, 13, 18, 24, 29, 35, 4l, 46, 52, 57, 63, 69, 74, 80, 85, 


Sound.loa_Request.ioJ<e8aage.mn_Node.ln_Prl=10; 

168,173,179,185,190,196,aOl,207 


/* Prozessespriorität»/ 

J f 


Sound.loa_Data=&buffer; /* Soundkanäle festlegen »/ 

extern struct MsgPort »CreatePort()j 


Sound.loa_Length=(ULONG)sizeof(buffer); 

extern struct Device »OpenDevioeOj 


/» Größe des Buffers */ 

struct MsgPort »SPortj 


if{SDev=0penDevloe(AUDI0NAME,0,iSourd,0)) 

struct Device »SDev; 


( 

/» Audio-Device öffnen */ 

struct lOAudio Sound; 


VOID SoundOffO /» Resourcen freigeben »/ 


SoundOffO; /* hat nicht geklappt »/ 

return(l); /» daher zurück mit 1 »/ 

if(lSDev) C108eDevice(&Sound)i /» Sounddevice schließen »/ 


J 

Sound.loa_Request.lo_Comniand »CMD WEITE; 

if(SPort) DeletePort(SPort,siseof{struct MsgPort)); 


/» Ausgabe vorbereiten »/ 

/* Port »/ 


Sound.ioaJleque3t.io_Flags «ADr0F_PERV0Ll lOF QUICK; 

if(SData) FreeMeni(SData, 56); /» Speicherbereich 


/• Flags */ 

freigeben »/ 


Sound.ioa_Data -SData; 

) 


/» Zeiger auf die Sounddaten •/ 

SHORT SoundOnO /» Klang initialisieren; Rückgabewert in 


Sound.ioa_Length =56; 

/* Anzahl der Werte (UBYTE) »/ 

Fehlerfalle: 1 */ 


Sound.ioa_Period »(UWORD)255; /• Samplerperlode */ 

[ 

UBYTE •AllocMein(); 


Sound.ioa_Voluine =64; /* Lautstärke »/ 

Sound.ioa_Cycles «(UWORD)l; /« Wiederholungen »/ 



retum(O); /* Null: alles OK »/ 

/» Mit AllocMeiaO Speicher für Daten im Chipmemory anfordem: »/ 



if ( l (SData»AllocHem( 56, MEMF_CHIP))) retum( 1); 


Listing 2. Ein dokumentiertes Listing zum Quellcode einer 
Sounddatei, die vom SEEd erzeugt wurde 


A Probleme mit Artikeln 

dritten Sonderheft? 

Fehlerkorrekturen. 


Guru-Meditation 


Sonderheft 3, Seite 28, Amiga-Basic Im Höhenflug 
Im Listing 37 hat der Fehlerteufel zugeschlagen; In einigen Zei¬ 
len waren statt des senkrechten Striches, der sich auf der Amiga- 
Tastatur rechts oben (neben < - >) befindet, eine »eckige Klam¬ 
mer zu« abgedruckt. Ersetzen Sie einfach die entsprechenden Zei¬ 
chen, dann läuft das Programm. 

Sonderheft 3, Seite 75, Börsenfieber am Amiga 
Im Listing 1 »Broker« ist in den Zeilen 557 bis 573 jeweils das Zei¬ 
chen »eckige Klammer zu« durch den senkrechten Strich zu erset¬ 
zen. 

Programmservice-Diskette zum Sonderheft 3 

Wir hatten leider ein großes Problem mit der Service-Diskette: 
Diese ist randvoll mit Programmen. »XRef« und die Routinen zum 
Basic-Kurs waren nicht unterzubringen. Wir haben uns deshalb 
entschlossen, diese Programme zu allen Programmen aus Son¬ 
derheft 4 auf die Service-Diskette zu diesem Heft zu kopieren. 
Selbstverständlich kopieren wir die Programme auch auf eine lee¬ 
re, formatierte Diskette, wenn Sie uns diese mit einem entspre¬ 
chenden Hinweis und der Angabe Ihrer Kundennummer einsen¬ 
den. 


Sonderheft 3, Seite 120, Gibber > tödliche Linien 
Sollten Sie Schwierigkeiten mit dem Basic-Lader für »Gibber« 
haben: Laden Sie Amiga-Basic und geben Sie ein: 

CLEAR,40000 

Laden Sie den Basic-Lader und verändern Sie die Zeile 3: 
OPEN "dfO:gibber" FOR OUTPUT AS 1 

Anschließend starten Sie das Basic-Programm. Das lauffähige 
»Gibber« wird auf der Diskette im internen Laufwerk erzeugt. 
Sonderheft 3, Seite 125, Die Rätselmaschine 
In das Listing »Textsalat« hat unsere Satzmaschine ein paar fal¬ 
sche Zeichen eingeschmuggelt. In den Zeilen 21,111 und 134 er¬ 
setzen Sie bitte die Zeichen »• *2« durch den Ausdruck »*2«. Dann 
gibt es keinen Dimensionierfehler mehr. 

Sonderheft 3, Seite 130, Bodenlos 
Im Listing 1 sind in den Zeilen 69 bis 71 die Zeichenfolgen »• *« 
durch das Hochdach »*« zu ersetzen. Die »Klammer auf« In den Zei¬ 
len bleibt jeweils stehen. 

Sonderheft 3, Seite 111, Moderne Zeiten 
Ein ergänzender Hinweis: Die Level-Dateien müssen unbedingt 
im ASCII-Format gespeichert werden. Der Checkie42 erledigt das 
automatisch. Vielleicht laden Sie die Datei aber irgendwann mit 
Amiga-Basic, zum Beispiel um sie zu editieren. Denken Sie bitte 
daran, das Programm mit dem Kommando »Save"Level",a« zu 
speichern. Andernfalls speichert Amiga-Basic in einer speziellen 
Form, und das Hauptprogramm kann die Datei nicht laden. 

Sonderheft 3, Seite 159, Checksummer 
In Zeile 122 muß die Prüfsumme korrekt lauten; »NK«. 

Sonderheft 3, Seite 18, Basic-Dialekte 
Auf Seite 26 wird behauptet, GFA-Basic-Programme seien aus 
rechtlichen Gründen nicht weiterzugeben. Das ist nicht richtig. 
GFA liefert zusammen mit GFA-Basic den Run-Only-Interpreter 
GFABASRO aus. Dieser darf mit einem Programm weitergegeben 
werden. Diese Information ist allerdings nicht in der Version des 
Handbuchs enthalten, die wir von GFA erhielten. Der einen Satz 
lange Hinweis versteckt sich in einem zusätzlichen Read-Me-File, 
in dem auch die Animation von Objekten ausführlich erklärt wird. 
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S chluß mit den Befehlen 
»Echo« und »Type«, es 
lebe die Laufschrift! Da¬ 
bei haben Sie vollen Einfluß auf 
den scrollenden Text. Dieser 
kann beliebig plaziert, sowie in 
unterschiedlicher Breite und 
mit variabler Geschwindigkeit 
dargestellt werden. 

Unser Tool »hscroll« (Listing 
1) ist in Aztec-C geschrieben, 
Geben Sie das Listing bitte mit 
dem Checksummer ein. Zur 
Compilation tippen Sie einfach 
»cc +\ hscroll.c« gefolgt von »In 
hscroll.o -Ic32« ein. Danach 
wird es am besten in den C- 
Ordner kopiert, so daß es jeder¬ 
zeit zur Verfügung steht. Fol¬ 
gende Optionen stehen zur Ver¬ 
fügung, die alle mit einem Leer¬ 
zeichen getrennt hinter 
»hscroll« eingegeben werden: 


•Ix: X ist die Position auf 
der X-Achse für die 
Laufschrift (Werte von 
0 bis 639). 

-ty: y gibt die y-Position an 
(Werte von 1 bis 256 
beim PAL-Amiga). 

-wn; setzt die Breite des 
Ausgabefensters auf n 
Pixel. Das Fenster 
kann maximal 640 
Punkte breit sein, 
wenn Sie Null bei »•!« 
angeben. 

-sn: n legt die Geschwin¬ 
digkeit fest, die Werte 
von 1,2,4 oder 8 
annehmen kann. 

-rn: n entspricht hier der 
Anzahl der Wiederho¬ 
lungen. Bei ns1 läuft 
Ihr Text nur einmal 
durch. 


Der eigentliche Text der Lauf¬ 
schrift wird mit einem Editor ge¬ 
schrieben und als ASCII-Fite 
abgespeichert. Er kann dann 
ebenfalls als Parameter hinter 
»hscroll« übergeben werden. 
Beispiel; 

hscroll DateiName -10 - 
tlOO -w200 

Dieser Aufruf schickt eine 
Laufschrift am linken Rand des 
Screens (etwa in der Mitte) über 
eine Breite von 200 Bildpunk¬ 
ten. Eventuelle Returns inner¬ 
halb des Ausgabe-Textes wer¬ 
den durch Leerzeichen ersetzt. 
Dies ermöglicht ungeahnte Ef¬ 
fekte: Lassen Sie Ihre eigenen 
Fehlermeldungen anzeigen, 



Code durchlaufen oder geben net wird. Das hängt da- der Task mit auch noch so klei- 

Sie Directories in Laufschrift mit zusammen, daß der Task ner Priorität mal den Blitterver- 
aus. immer auf die vertikale Austast- wenden, was ein leichtes Ruk- 


Haben Sie eine der Optionen lücke wartet. Dies ist - verein- kein zur Folge hat. Dies kann 

nicht verwendet, so werden facht gesagt - der Moment, in nicht umgangen werden, wenn 

Default-Werte benutzt, von de- dem der Elektronenstrahl sich man sich konsequent an die 

nen Sie allerdings nur den für in Zeile 0 befindet. Je weiter Multitasking-Konventionen hal- 

»-r« kennen müssen. Ohne »-r« oben sich nun die Laufschrift ten will. 


gibt es eine annähernd unbe¬ 
grenzte Wiederholungszahl, 
nämlich genau 2®^-1. Dies sind 
immerhin etwas über 4 Milliar¬ 
den Wiederholungen; für die 
meisten Anwendungen dürfte 
das ausreichen. Dies heißt aber 
nicht, daß Sie Ihre Laufschrift 
jetzt eine Woche lang betrach¬ 
ten müssen, sie kann auch mit 
der Maus weggeklickt werden. 

Mehr Effekt 
mit »Run« 

Sie können »hscroll« auch 
problemlos als Background- 
Task starten, so daß die Lauf¬ 
schrift im Hintergrund ihrer We¬ 
ge geht. Dies kann beispiels¬ 
weise sinnvoll sein, wenn ein 
längeres Programm geladen 
werden soll und währenddes¬ 
sen eine Laufschrift das Ganze 


befindet, desto weniger Zeit 
verbleibt, den Window-»Rast- 
Port« zu scrollen, ohne daß zu¬ 
gleich das Bild dargestellt wird. 
Wenn hierfür nicht genügend 
Zeit ist, flimmert die Textdarstel¬ 
lung. Der Einfachheit halber 
wurde auch auf das sogenann¬ 
te »Double Buffering« verzich¬ 
tet. 

- Sind mit »run hscroll« mehre¬ 
re Tasks aufgerufen worden, so 
kann es leicht passieren, daß 
Ihr CLI Task sozusagen »out of 
CPU« gerät, also keine Rechen¬ 
zeit rr)ehr bekommt. Das liegt 
daran, daß die Laufschrift- 
Tasks bei Aufruf die höchst¬ 
mögliche Priorität bekommen, 
um ein Ruckein zu verhindern. 
Man mache sich klar, daß die 
vertikale Austastlücke etwa 50 
mal pro Sekunde auftritt und 
»hscroll« ebensooft den Pro- 


Zur Beschleunigung der 
Textausgabe gibt es auf dem 
Amiga einige nützliche Utilities, 
unter anderem auch »Blitz- 
Fonts!« und »FastFonts«, das 
sich auf der neuen Workbench 
1.3 befindet. Diese wirken sich 
auch günstig auf unsere laufen¬ 
den Texte aus. Sie sind also un¬ 
bedingt zu empfehlen, vor al¬ 
lem wegen der geringeren Re¬ 
chenzeit. 

Um dem Laufschrift-Task ein 
möglichst ruckeifreies Dasein 
zu bescheren, wird mittels »Set- 
TaskPri(FindTask(0),127):« die 
Priorität desselben auf den 
größtmöglichen Wert gesetzt. 
»FindTask(O)« durchsucht die 
Liste der gerade ablaufenden 
Tasks und übergibt den ent¬ 
sprechenden Zeiger auf die 
TaskStruktur. Nach Beendi¬ 
gung der Hauptschleife wird die 


ein wenig schmücken könnte, zessor benötigt. Priorität dann auf einen norma- 

Installieren Sie diese also zu- -Es können nur 8 x 8-Punkt len Wert zurückgesetzt. Es wer- 


erst mit »run hscroll« und den Zeichensätze verwendet wer- den die üblichen Libraries ge- 


entspechenden Parametern 
(am besten in einer Batch-Da¬ 
tei) und erst danach kommt der 
eigentliche Befehl zum Laden. 
Dabei kann es verkommen, daß 
der Ladevorgang geringfügig 
langsamer wird Qe nach Größe 
der Ausgabe). Soll die Lauf¬ 
schrift noch kurz vor Beendi¬ 
gung des Ladens verschwin¬ 
den, können Sie die Option »-r« 
verwenden. 


den. Wer also in seinem CLI an¬ 
dere benutzen möchte, der soll¬ 
te erst einmal diese Einschrän¬ 
kung überprüfen. Aus diesem 
Grunde beträgt die Höhe des 
geöffneten Scroil-Fensters 
auch immer 8 Pixel. 

- Laufschriften sind nichts an¬ 
deres als kleine Fenster. Sie 
können von anderen Fenstern 
überlappt werden und dann 
einfach verschwinden. 


öffnet, die für die Venwaltung 
von Fenstern und Grafik not¬ 
wendig sind. Um den einzule- 
senen ScrollText dynamisch 
venwalten zu können, muß des¬ 
sen Länge bekannt sein. 

Besser geht’s 
mit BlitzFonts! 

Es wird daher Speicher für 


Es gibt fünf Dinge, die Sie bei 
der Benutzung dieses Tools 
wissen sollten; 

- Das Scrolling ist nicht unbe¬ 
dingt immer stufenlos, wenn die 
Laufschrift ganz oben im Bild- 


- Jedes Programm, das länge¬ 
re Blitter-Operationen veran¬ 
laßt, ist ein potentieller Störfak¬ 
tor bezüglich des Filescrollings. 
Schließlich benutzt auch 
»hscroll« den Blitter zum Scrol- 


die Daten des »FilelnfoBlocks« 
reserviert, aus dem man nach 
Untersuchung des Files die 
Länge desselben entnehmen 

kann (»FilelnfoBlock- > fib_ 

Size«). 
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Sozusagen als Unterlage für 
die Laufschrift wird ein einfa¬ 
ches Fenster »ohne alles« ge¬ 
öffnet, welches im übrigen ge¬ 
nau ein Gadget zum Weg¬ 
klicken enthält. 

Die Hauptschleife wartet zu¬ 
nächst mit »WaitTOFO:« auf die 
nächste Austastlücke und 
scrollt dann den gesamten 
»RastPort« des Fensters um p 
Pixels (je nach eingestellter Ge¬ 
schwindigkeit) nach links. Mit 
Hilfe der Text-Funktion wird 
dann der neu hinzugekomme¬ 
ne Teil neu geschrieben. Das ist 
in diesem Fall äußerst einfach, 
weil Operationen im RastPort 
grundsätzlich nicht über den 
Rand hinaus gehen, also nichts 
außerhalb unseres Fensters 
verändern. Eventuelle Reste 
werden einfach abgeschnitten. 

Smooth mit 
WaitTOFO 

Die Hauptschleife wird solange 
durchlaufen, bis entweder die 
Variable für die Wiederholun¬ 
gen abgelaufen ist oder eine 
Nachricht am Port des Fensters 
anliegt. Auch dieser Fall ist 
leicht zu handhaben, da wir nur 
ein Gadget zur Verfügung ha¬ 
ben, das den IDCMP des Fen¬ 
sters ansprechen kann; damit 
können wir uns eine Auswer¬ 
tung der Nachricht sparen. 

Möglicherweise stört Sie die 
Beschränkung von »hscroD« auf 
eine Zeile? Die Lösung heißt 


»vscroll« (Listing 2). Dieses Pro¬ 
gramm ist in den wesentlichen 
Punkten genauso aufgebaut. 
Das Textfile wird jetzt allerdings 
nach der längsten enthaltenen 
Zeile abgesucht. Diese be¬ 
stimmt die Breite des Ausgabe¬ 
fensters. Falls der rechte Rand 
des Screens überschritten 
wird, bricht das Programm vor¬ 
her ab. Selbstverständlich ar¬ 
beitet »vscroll« auch mit exoti¬ 
schen Formaten wie der TO4 Pi¬ 
xel breiten Workbench oder 
dem PD-Programm »VScreen- 
Handler« zusammen. 

Bitte beachten Sie den Li¬ 
stingausschnitt von Zeile 163 
bis Zeile 166. Hier wird dem Be¬ 
triebssystem suggeriert, es 
würde nur eine Bitplane beste¬ 
hen. Durch diesen kleinen Trick 
erreichen wir eine geringere 
Belastung des Blitters für die 
Scroll-Operationen. Vor Been¬ 
den des Programms werden 
die Bitplanes wieder auf Nor¬ 
malwerte gesetzt. 

»vscroll« können Sie mit dem 
Aztec (»cc vscroll.c« gefolgt von 
»In vscroll.o -Ic«) oder mit dem 
Lattice (»Ic -w vscroll«) compilie- 
ren. 

Vielleicht fallen Ihnen selbst 
noch einige Verbesserungen 
ein, wie zum Beispiel verschie¬ 
dene Schriftarten, per Tasten¬ 
druck verschiebbares Fenster 
oder ähnliches? Wir wünschen 
Ihnen auf jeden Fall viel Spaß 
beim Experimentieren mit die¬ 
sem Utility. (Christian Wolf^o) 


Programmname: 

hscroll 

Computer: 

A500, A1000, A2000 mit Kickstart 1.2 

Sprache: 

Aztek-C 

Compiler: 

Version3.6 

Aufrufe: 

cc -t-l hscroll.c 


In hscroll.o -Ic32 


Programmautor: Christian Wolf 


1 OfO 

#lnclude exec/types.h 


2 xV 

#lnclude Irtultion/lntuition.h 


3 Dt 

#include Intuition/Intuitionbase.h 


4 dl 

#lnclude exec/exec.h 


5 tP 

#include exec/execbase.h 


6 Ud 

#inelude libraries/dos.h 


7 v5 

#inolude llbraries/dosextens.h 


6 kJ 

#lnclude graphics/gfxmacros.h 


9 Ho 

#include functions.h 


10 Rra 

#define NOBORDER NULL 


11 yv 

#define NOTEXT NULL 


12 Fc 

/* Gadget zum Abklicken... */ 


13 EM 

struct Gadget CllckGadget = ( NULL,0,0,0,8,GADGHNONE,RELVZR 


14 5vU 

IFY, 

BOOLGADGET »NOBORDER,0,NOTEXT, 



0,0,NULL,OJ ; 


15 t90 

/* Einfaches Fenster ohne alles... */ 

16 99 

struct NewWlndow NewScrollUindow = ( 

17 Ch7 

0,230,640,8,0,1, 

18 V9 

GADGETUP, 

19 x6 

BORDERLESS, 

20 ZJ 

&CllokGadget,NULL, 

21 wB 

NULL, 

22 Y2 

NULL,NULL, 

23 xT 

0,0,0,0, 

24 SU 

WBENCHSCREEN ) j 

25 LsO 

/* Das Übliche... */ 

26 tM 

struct IntultlonBase »IntuitionBaae; 

27 Dq 

struct GfxBase «GfxBase; 

28 wT 

/* Default scrolltext */ 

29 Ag 

eher *DefaultText= "Tlscroll 1.0 (w) 1989 by Christian Wolf. 


Optlons: -Ix and -ty' 

30 RtJ 

" puts your ecroll to equlvalent x and y 


Position. Use -w to' 

31 TJ 

' select the wlndou's wldth. -s Is used 


to have different' 

32 IP 

' scroll speeds. Values allowed are: 1,2 


,4,8. Add a filenarae" 

33 hO 

" to your Parameter list to have your ow 


n text. -rn lets' 

34 bQ 

" the text repeat n tlmee. To remove the 


scrolltext. Just' 

35 ft 

' dick It. Have much fun... 

36 eOO 

raaln(argc,argv) 

37 Ibl 

int arge; 

38 dB 

char **argv; 

39 Z20 

1 

40 Prl 

struct Window »ScrollUlndow; 

41 qQ 

struct RastPort »ScrollRastPort; 

42 Ud 

short 1=160,t*248,w=320,s=2,p»0,c=0,sl»strlen(DefaultText) 

43 qC 

long r=0xffffffff,Size; 

44 Dh 

struct FlleHandle «ThisFlle; 

45 FN 

struct FlleLock »MyLock; 

46 6F 

char »ScrollText*DefaultText,*HyPtr; 

47 ID 

struct FllelnfoBlock »FllelnfoBlock; 

48 AY 

/» Damit es nicht so ruckelt -> höchste TaskproritSt.»/ 

49 CR 

SetTaskPri(FindTask(0),127); 

50 aA 

/» FllelnfoBlock öffen... */ 

51 yK 

FlleInfoBlock*AllocMem(sizeof(struct FlleInfoBlock),HEMF_P 


UBLICl MEMF.CLEAR); 

52 Pf 

if (!FllelnfoBlock) exit{0); 

53 Oy 

/* Parameter liste durchgehen */ 

54 uJ 

arge--; 

55 00 

argv++; 

56 8D 

whlle {arge—) 

57 rK8 

[ 

58 um9 

if (»*argv=='-') 

59 tMD 

( 

60 o2E 

(*argv)-H-; 

61 an 

swltch((»{*argv)++)) 

62 wPL 

[ 

63 ErM 

case 'w': 

64 d9 

w=atoi(*argv); 

65 y7 

break; 

66 kC 

case '1': 

67 Kf 

l=atoi(*argv); 

68 lA 

break; 

69 Bl 

case 't': 

70 d6 

t=atoi(*argv); 

71 4D 

break; 

72 Bk 

case 's': 

73 e6 

s=atoi(*argv); 

74 7G 

break; 

75 Bj 

case ’r': 

76 f6 

r=atoi(*argv); 

77 AJ 

break; 

78 GIL 

] 

79 HmD 

j 


Listing 1, »hscroll.c« zaubert Ihnen eine horizontale 
Laufschrift auf den Bildschirm 
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80 7u9 

81 FiD 

eise 

( 

82 YKE 

/» TextFile laden... */ 

83 WJ 

84 III 

if (ThisFilesOpen(»argv,MODE_OLDFILE)) 

I 

85 qNJ 

MyLock=Lock(»argv,ACCESS_READ); 

86 xl 

Exanilne(Hy Lock, FllelnfoBlock); 

87 2d 

Slze=FlleInfoBlock-> flb_Size; 

88 iW 

if (MyPtr=ScrollText=AllooMein(Size,HEMF_ 
PUBLIC)) 

89 NqO 

90 7WP 

91 dj 

92 QR 

l 

Read(ThisFile,ScrollText,Size); 
MyPtr[Size]»0; 

/» eventuelle retums entfernen... 

•/ 

while (*MyPtr) 

93 Db 

94 SvW 

95 2WX 

( 

if (»MyPtr »= OxOa) »HyPtr 

96 Z9 

97 Z4W 

eise MyPtr++; 

! 

98 sHP 

UnLock(MyLock); 

99 B4 

100 c70 

Close(ThisFile); 

) 

LOl QdJ 
L02 e9I 

eise ScrollText=DefaultText} 

! 

103 hPE 

104 gBD 

sl»strlen(ScrollText); 

] 

105 0o9 

106 1D8 

argv++; 

I 

107 Q51 

/* Libries Öffnen... */ 

108 DE 

IntuitionBase=(stmct IntuitlonBase »)0penLibrary('lntultl 
on.library',0); 

109 mQ 

GfxBa8e=(8tmct GfxSase •)OpenLlbrary('graphice.library',0 
)5 

/* Werte für Fenster und Gadget initialisieren */ 

110 Tr 

111 XU 

NewScrollWlndow.LeftEdge«!; 

112 Ul 

NewScrollUindow.TopEdge^t; 

113 wp 

NewScrollWlndow.Width-u; 

114 Uz 

ClickGadget.LeftEdge>0; 

115 LK 

CllckGadget.TopEdge>0; 

116 Lv 

ClickGadget.Uidthxw; 

117 Bh 

/» Fenster öffnen »/ 

118 Sk 

if (I(ScrollUlndowaOpenWlndow(&NewScrollUindow))) exlt(O); 

119 gF 

/» Rasterport holen */ 

120 To 

ScrollRastPortsScrollWlndow-> RPort; 

121 w 

SetAPen(SorollRa8tPort,3); 

122 mk 

SetBPen(ScrollRastPort,0); 

123 Zq 

SetDrMd(ScrollRastPort,JAMl); 

124 dx 

/* Hauptschleife -> Scrollen, solange r!*0 oder UaerPort 
leer »/ 

125 UX 

while {IGetHsg(ScrollWlndow->UserPort) && r) 

126 yR2 

127 5J3 

i 

/» Auf den VBL warten •/ 

128 Ij 

UaltT0F(); 

129 MR 

/» Grafik um s Pixels verschieben... »/ 

130 Sv 

ScrollRaster(ScrollRastPort,s,0,0,0,w-l,7); 

131 S7 

Move{5crollRastPort,w-s-p,6); 

132 kC 

if (sl <» c) 

133 5Y7 

134 wB8 

{ 

cO; 

135 Te 

136 Ch7 

r—; 

i 

137 eV3 

/» Nachfolgenden Text reinschreiben */ 

138 MW 

Text(ScrollRa8tPort,&ScrollText[c],l); 

139 X4 

p+=s; 

140 9w 

if (p > 8-s) 

141 Dg7 

142 Uw8 

( 

p=0; 

143 tl 

144 Kp7 

e++} 

) 

145 L<i2 

146 pil 

I 

/» Alles schließen... */ 

147 ER 

CloseWindow(ScrollWindow); 

148 fE 

CloseLlbrary(IntuitlonBase); 

149 pL 

CloseLibrary(GfxBase); 

150 U8 

if (ScrollTextl»DefaultText) FreeMem(ScrollText,sl); 

151 s9 

if (FllelnfoBlock) FreeHeiii(FileInfoBlock,sizeof(struct Fll 
elnfoBlook)); 

152 r9 

153 TyO 

SetTaskPrl(FindTask(0),0); 

] 

(C) 1989 H&T 

Listing 1. (Schluß) 


Programmname: vscroll 


Computer: A500, A1000, A2000 mit Kickstart 1.2 


Sprache: C 


Compiler: Aztec oder Lattice 


Aufrufe: siehe Text 


ProgramiDautor: Chrlatlan Wolf 


1 

160 

2 

On 

3 

AF 

4 

bk 

5 

51 

6 

Zd 

7 

p6 

8 

iM 

9 

QM 

10 

Au 

11 

Cd 

12 

To 

13 

aX 

14 

He 

15 

SS 

16 

7xU 

17 

vBO 

18 

BB 

19 

EJ7 

20 

u8 

21 

z8 

22 

bL 

23 

yD 

24 

a4 

25 

52 

26 

UY 

27 

NuO 

28 

vO 

29 

Fs 

30 

8t 

31 

oAF 

32 

zfO 

33 

2ZV 

34 

Jn 

35 

YA 

36 

nm 

37 

PT 

38 

vk 

39 

17 

40 

It 

4l 

G7 

42 

nV 

43 

8E 

44 

Vu 

45 

cm 

46 

dn 

47 

eo 

48 

Gc 

49 

LBO 

50 

fx 

51 

qOl 

52 

Cq 

53 

nGO 


# include <intultlon/lntuitionbase.h> 

#lnclude <llbraries/do3.h> 

# include <exec/nieinory.h> 

# Include <graphics/gfxbase.h> 

#ifdef UTTICE 

# include <proto/all.h> 

Tl^else 

#include <function8.h> 

#endif 

#define fib FllelnfoBlock 

#define fibsize (long)8izeof(stnict fib) 

#define NOBORDER NULL 
#define NOTEXT MULL 
/* fladget zum Abklicken... »/ 

struct Cadget ClickGadget * { MULL,0,0,0,0,GADGHN0NE,RELVER 
IFY, 

BOOLGAMET, NOBORDER, 0, NOTEXT, 
0,0,NULL,0j ; 

/* Einfaches Fenster ohne alles... */ 
atmet NewWindow NewScrollWlndow * ( 

0,230,640,8,0,1, 

OADGETUPl GADGETUP, 

BORDERLESS, 

»ClickGadget,NULL, 

NULL, 

NULL,NULL, 

640,200,640,200, 

WBENCHSCREEN 1 ; 

/» Das übliche... */ 
struct IntuitlonBase *IntuitionBase; 
stmet OfxSase «GfxBase; 
stmet Table [ eher »Llnej 
long Len; ]; 

stmet Table DefaultText[] * ( ' VScroll 1.0 

',37, 

' (c) 1989 by Markt und Te 

chnlk ',37, 

* written by Christian W 
olf ",37, 

' currently resident at 

',37, 

' Spandauer Str. 104L 

",37, 

' 1 Berlin 20 

",37, 

' Tel.: 030/3660450 

",37, 

' Usage: vscroll textflle [ 
options] ',37, 

' üse -w to modify «indow's 
width ",37, 

' Use “S nuiiiber of jiffies 
1,2,4,8 ',37, 

' Use -1 and -t to posltion 
Window ",37, 

' Use -r for no. of repetit 
ions ",37, 

" Use -h for a new height o 
f Window ",37, 


struct BitHap ScrollBitMap; 
void main(argc,argv) 
char »*argv; 
int arge; 
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Listings 


54 Otl 

struct Table *ScrollText=DefaultText,*cl=DefaultText; 

55 nJ 

char *MyPtr,*LoadTextsOi 

56 f7 

struct Window *ScrollWindowj 

57 6g 

struct RastPort »ScrollRastPort; 

58 9W 

long I=l60,t=60,ws37»8,s=l,p=0,c=0,h=100,sl; 

59 SS 

long r=Oxffffffff,Size,Llnesj 

60 z6 

struct fib *flb; 

61 Uy 

struct FileHandle *ThlsFile; 

62 Ue 

struct FileLock »MyLock; 

63 VI 

int ii 

64 Qo 

/* Damit es nicht so ruekelt -> höchste TaskproritSt */ 

65 Py 

SetTaskPri(FindTask(0L),127L); 

66 bB 

/« Parameter liste durchgehen */ 

67 7W 

arge—; 

68 PD 

argv++j 

69 LQ 

while (arge—) 

70 4X8 

{ 

71 7z9 

if (»»argv=='-’) 

72 6ZD 

1 

73 IFE 

(*argv)++j 

74 nO 

switch((»(*argv)-H-)) 

75 9cL 

( 

76 i6M 

case 'h': 

77 Md 

h=atoi(»argv); 

78 BK 

breakj 

79 *P 

case '1': 

80 Xs 

l=atoi(*argv); 

81 EN 

break; 

82 Oy 

case ’t': 

83 qJ 

t»atoi(*argv); 

84 HQ 

break; 

85 Ox 

case 's': 

86 rJ 

s=atoi(*argv); 

87 KT 

break; 

88 Ow 

case 'r': 

89 sJ 

r»atoi(*argv); 

90 NW 

break; 

91 TyL 

] 

92 Ü2D 

j 

93 K79 

eise 

94 SvD 

( 

95 6SE 

If {ScrollText==DefaultText) 

96 OxI 

l 

97 nZJ 

/* TextFile laden... */ 

98 8f 

If (ThlaFlle*(8truct FileHandle »)0pen(» 


argv,MODELOLDFILE)) 

99 XON 

1 

100 ERO 

/« fib öffen... */ 

101 R9 

if (flba(struct fib »)AllocHeni{fibs 


ize,HEMF_PUBLIC)) 

102 a3S 


103 PJT 

MyLock»{struot FileLock »)Lock 


(»argv,ACCESS_READ); 

104 Nj 

Examlne(MyLock,fib); 

105 20 

UnLock(MyLock); 

106 T5 

Size=fib->fib_Size; 

107 Hm 

if (LoadText»(char »)AllooMem( 


Size,H£MF_PÜBLIC)) 

108 g9Y 

{ 

109 vRZ 

Read{ThlsFlle,LoadText,S 


ize); 

110 15 

LoadText[Size-l]=0; 

111 HY 

for (MyPtrsLoadText,Line 


s=2;*MyPtr;MyPtr++) 

112 kOe 

[ 

113 JZf 

if (»MyPtr »= OxOa 


) Llnes++; 

114 qLe 

) 

115 OGZ 

if (l(cl=ScrollText={etr 


uct Table *)AllocMem(Line 


s< <3,MEMF_PUBLICIHEMF_C 


LEAR))) exit(O); 

116 VS 

for (MyPtrsLoadText,ol++ 


-> Llne=LoadText;*MyPtr;) 

117 plc 

i 

118 Bkd 

if (»MyPtr =* OxOa) 

119 rKf 

( 

120 Rbg 

*MyPtr=0; 

121 VC 

cl++-> Line=++MyP 


tr; 

122 yTf 

• 1 

123 Oad 

eise MyPtr++; 


124 OVe 

j 

125 112 

cl->Line=0; 

126 W 

for (cl=ScrollText,w=0;c 

127 zSe 

l->Line;cl++) 

( 

128 WJf 

if ((cl->Len=strl 

129 5ae 

en(cl->Line)) > w 
) w=cl->Len; 

) 

130 76Z 

w< <=3; 

131 2K 

cl=ScrollText; 

132 8dy 

] 

133 w9T 

eise ScrollText=DefaultText; 

134 jS 

FreeMein{ fib, f ibsize); 

135 BgS 

1 

136 zCO 

eise ScrollTextsDefaultText; 

137 ng 

Close(ThisFile); 

138 EJN 

) 

139 Fkl 

) 

140 GID 

) 

141 a09 

argv++; 

142 Ins 

I 

143 Ofl 

/» Librles öffnen... */ 

144 VE 

IntultlonBaee=(struct IntuitlonBase *)OpenLibrary('intuiti 

145 J7 

on.library'.OL); 

CfxBase»{struct CfxBase *)OpenLibrary('graphlos.library',0 

146 3R 

L); 

/* Werte für Fenster und Cadget initialisieren »/ 

147 Xü 

NewScrollWindow.LeftEdge=l; 

148 4b 

NewScrollWindow.TopEdge« t ; 

149 WP 

NewScrollWindow.Width*w; 

150 rl 

NewScrollWindow.Helghtah; 

151 7a 

CllckOadget.LeftEdgesO ; 

152 tfv 

ClickOadget.TopEdge^O; 

153 o2 

CllckOadget.Helght.h; 

154 xX 

CllckOadget.Wldth=w; 

155 nJ 

/* Fenster öffnen */ 

156 aX 

if (ScrollWindowa(struct Window »)OpenWlndow(&NewScrollWln 

157 Tw5 

dow)) 

[ 

158 Js6 

/* Rasterport holen */ 

159 6R 

SorollRastPorts5crollWlndow->RPort; 

160 W 

SetAPen(ScrollRa8tPort,IL); 

161 WN 

SetBPen(SorollRastPort,OL) ; 

162 CT 

SetDrMd(SorollRastPort,JAMl); 

163 Np 

/• BltMap kopieren */ 

164 3k 

ScrollBltMap*»ScrollRastPort->BitHap; 

165 QW 

ScrollRa8tPort->BltMap=&ScrollBltMap; 

166 7Q 

ScrollBitMap.Depth=l; 

167 oE 

h+«6; 

168 BE 

while (lCetM8g(SorollWindow->U8erPort) && r) 

169 f87 

( 

170 0P8 

WaitTOFO; 

171 C8 

ScrollRa8ter(ScrollRa8tPort,0L,s,0L,0L,w-l,h-l); 

172 08 

Move(ScrollRastPort,OL,h-s-p); 

173 k6 

Text(SerollRastPort,cl-> Line, ol-> Len); 

174 6d 

p+=s; 

175 IV 

if {p > 8-8) 

176 mFC 

( 

177 3VD 

P=0; 

178 vq 

cl+4; 

179 20 

if {!cl->Line) 

180 qJH 

1 

181 q8I 

ol=ScrollText; 

182 EP 

r—; 

183 xSH 

1 

J 

184 yTC 

185 zU7 

1 

186 Xm6 

ScrollBltMap.Depth*2; 

187 Jm 

/* alles schließen */ 

188 t6 

CloseWindow(ScrollWlndow); 

189 3Y5 

1 

190 QRl 

CloseLlbrary((struct Library »)IntuitlonBase); 

191 AQ 

Clo3eLibrai7((struct Library *)GfxBase); 

192 8y 

if (ScrollTextUDefaultText) FreeMem(ScrollText,Lines< <3 

193 T9 

if (LoadText) FreeMem(LoadText,Slze); 

194 70 .. 

SetTaskPri(FindTask(OL),0L); 

195 9e0 } 

(C) 1989 H&T 

Listing 2. Mit »vscroll« bewegen Sie ein ganzes Textfile 

vertikai über den Screen 
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Doppelt 

Haben Sie sich schon einmal 
wünscht, damit Sie sich nicht ständig 
müssen? Vergessen Sie’s. Wlrzei 


S ie wollen im CLI Weiter¬ 
arbeiten, während Sie 
den Aufbau einer Grafik 
beobachten? Sie möchten 
beim Debuggen nicht ständig 
die Fenster durchschalten? 
Oder wollen Sie im Editor die 
letzten Ausgaben Ihres Pro¬ 
gramms nicht aus den Augen 
verlieren? Die Lösung heißt 
»Dualplayfield-Modus«. 

Wenn Sie in Zukunft für Ihre 
Programme mehr Platz brau¬ 
chen als ein Screen bieten 
kann, legen Sie einfach einen 
Teil der Ausgaben auf einen 
durchsichtigen Screen. Wenn 
Sie glauben, die Programmie¬ 
rung wäre zu aufwendig, ver¬ 
wenden Sie die Routinen aus 
»Dual.c« (Listing 1). 

Mit zwei neuen Grafikfunktio¬ 
nen und einigen Erläuterungen 
zum Sachverhalt schaffen wir 
allen C-Programmierern die 
Grundlage zu einer komforta¬ 
blen Nutzung dieser einmali¬ 
gen Fähigkeit. Um die Sache 
erst einmal locker angehen zu 
lassen, tippen Sie zunächst das 
Listing ein und compilieren es 
mit »Ic -L dual« (wenn Sie einen 
Lattice-Compiler haben) oder 
mit »cc +1 dual«, gefolgt von »In 
dual -Ic32« als Aztec-Besitzer. 
Mit Eingabe von »dual« starten 
Sie unser Demo-Programm. 
Wenn alles geklappt hat, wird 
die Workbench plötzlich rot 
übermalt, um dann mit rotem 
Hintergrund wieder aufzutau¬ 
chen und schließlich wieder ih¬ 
re alte Hintergrundfarbe anzu¬ 
nehmen. Dieser Vorgang wie¬ 
derholt sich zehnmal, bevor 
das Programm selbständig ab¬ 
bricht. 

Wer aufmerksam gewesen 
ist, der wird bemerkt haben, 
daß während des Malvorgan¬ 
ges der Inhalt der Workbench- 
Grafik nicht verändert wurde. 
Damit sind wirauch schon beim 
entscheidenden Punkt: 

Grafiken 
überlagem sich 

Der Dualplayfield-Modus er¬ 
laubt die gleichzeitige und von¬ 
einander völlig unabhängige 
Darstellung zweier »Playfields«, 
ohne daß diese sich in irgendei¬ 
ner Weise gegenseitig beein¬ 
flussen. Dabei spielt lediglich 
die Priorität der Darstellungsflä¬ 
chen eine Rolle, da das eine 
Playfield durch das andere 
überlagert wird. Der Effekt der 
Überlagerung kommt dadurch 
zustande, daß die vordere Gra¬ 
fik immer mit transparenter Hin¬ 
tergrundfarbe definiert ist. Da¬ 
durch kommt sozusagen statt 
der Hintergrundfarbe die untere 
Grafik durch. Bei unserem De¬ 
mo ist anfangs offensichtlich 


die Workbench überlagert, 
beim Löschen die vordere Gra¬ 
fik. 

Nachdem die grundlegen¬ 
den Prinzipien nun etwas ver¬ 
trauter sind, können Sie sich an 
die Einbindung unseres Dual- 
playfield-Tools in Ihre eigenen 
Programme machen. Am be¬ 
sten compilieren Sie das Listing 
ohne den »main«-Teil, so daß 
die Möglichkeit besteht, unsere 
Funktionen später als Modul 
hinzuzulinken. Um damit eine 
Grafik als Vordergrund zu akti¬ 
vieren, fügen Sie die Funktion 
»MakeDual(Depth,ScreenTitie)« 
zu Ihrem C-Quelltext hinzu. Da¬ 
bei gibt »Depth« die Anzahl der 
Bitplanes, also die Farbvielfalt 
und »ScreenTitle« den Namen 
des Screens an, in dem wir fort¬ 
an Weiterarbeiten wollen, übli- 
chenveise ist das der Work- 
benchScreen. Sollte die Funk¬ 
tion einen Wert ungleich Null 
zurückgeben, dann ist irgend¬ 
etwas schiefgegangen. Mögli- 

Einiache 

Installation 

che Fehlerquellen sind zu we¬ 
nig Speicher, ein nicht gefunde¬ 
ner Screen oder aber eine un¬ 
zulässige Anzahl von Bitplanes 
- hier sind nur die Werte 1 oder 
2 zugelassen. Wurde die Funk¬ 
tion in Ihrem Programm aus 
Versehen zum zweiten Mal auf¬ 
gerufen, dann wird dies eben¬ 
falls entsprechend quittiert. Die 
Installation selbst bringt keine 
sichtbaren Veränderungen mit 
sich, und das Vorhandensein 
wird erst bei nachfolgendem 
Ansprechen des Bildschirm¬ 
speichers bemerkt. 

Um Grafikoperationen in die 
Wege zu leiten, werden zwei 
Strukturen zur Verfügung ge¬ 
stellt, die dem Amiga-Grafik- 
Programmierer nicht ganz un¬ 
bekannt sein dürften: »struct 
RastPort DualRastPort« und 
»struct BitMap DualBitMap«. 
Sie wurden bei Aufruf von »Ma- 
keDual« initialisiert und ge¬ 
währleisten die Benutzung aller 
im Amiga residenten Grafik¬ 
funktionen, die fast immer auf 
diese Strukturen zurückgreifen. 
Unser Demo zeigt dies ganz 
deutlich. Nach ein paar Versu¬ 
chen werden Sie problemlos 
damit zurechtkommen. Beach¬ 
ten Sie an dieser Stelle bitte 
noch, daß die neuen Grafik- 
Tools sowohl die »Graphics-« 
als auch »Intuition.library« be¬ 
nötigen. Beide werden vom Mo¬ 
dul aus geöffnet. 

Wie schon erwähnt kann 
man die Priorität der Playfields 
selbst bestimmen. Um diese 
Fähigkeit des Amiga zu nutzen, 
bedienen Sie sich einfach der 


Funktion »DualTo(FRONT)«, 
um die Workbench bezie¬ 
hungsweise den Screen Ihrer 
Wahl zu überlagern. Die gegen¬ 
teilige Wirkung erreicht man 
mit dem Funktionsargument 
»BACK«, damit wird die Grafik 
einfach in den Hintergrund ge¬ 
legt. Unser kurzes Demo de¬ 
monstriert dies deutlich. 

Jeder Programmierer sollte 
bei seinen Programmen dafür 
sorgen, daß bei Programmen¬ 
de sämtlicher reservierter Spei¬ 
cher freigegeben und geöffnete 
Libraries wieder geschlossen 
werden. Haben Sie irgendwann 
einmal den Dualplayfield-Mo¬ 
dus aktiviert, so bleibt dieser 
solange erhalten, bis vom Pro¬ 
gramm die Anweisung »Close- 
DualO;« angetroffen wird. Hier¬ 
mit sorgen Sie für die korrekte 
Rückgabe des Speichers an 
das System, für das Schließen 
der Libraries und für den nor¬ 
malen Workbench'Betrieb. 
Schließen Sie Ihren C-Quelltext 
immer mit dieser Zeile ab, denn 
nur so hält man sich so an die 
Konventionen des Multitask¬ 
ings. 

Mit dem Einschalten des 
Dualplayfield-Modus bietet sich 
dem Grafikprogrammierer bei¬ 
spielsweise auch eine prakti¬ 
sche Hilfe beim Debuggen sei¬ 
ner Programme. Stellen Sie 
sich folgende Situation vor: Als 
stolzer Besitzer des Aztec-C- 
Entwicklungssystems inklusive 
Source-Level-Debugger sind 
Sie gerade dabei, ein Pro¬ 
gramm zu entwerfen, das unter 
Benutzung eines eigenen 
Screens als Grafikunterlage Ih¬ 
re kreativen Ideen in die Tat um¬ 
setzt, aber partout nicht laufen 
will. Dies endet meist mit dem 
Einsatz des Debuggers, und es 
wird Zeile für Zeile überprüft. 
An den (vermutlich) kritischen 
Stellen schaltet man die Grafik 
in den Vordergrund und schaut 
nach, was passiert ist, schaltet 
zurück und führt die nächste 
Zeile aus, schaltet vor, schaltet 
zurück - ein Schalten ohne En¬ 
de. Wünschenswert wäre also 
die Möglichkeit, sowohl Debug¬ 
ger als auch Grafik auf einen 


Blick zu haben. Nichts leichter 
als das! Jetzt wird einfach 
»dual.c« hinzugefügt und 

»MakeDual(1," Workbench- 
Screen");« statt »Open- 
ScreenO;« benutzt. Da wir so¬ 
wohl BitMap- als auch Rastport- 
Struktur zur Verfügung haben, 
ist ein problemloses Verlagern 
der Grafik möglich. Sie sollten 
sich jetzt nicht beklagen, daß 
Sie nur noch maximal vier Far¬ 
ben zur Verfügung haben, es 
geht schließlich nur darum, den 
Fehler im Algorithmus zu fin¬ 
den. 

Wenn zuviel der Fläche des 
Vordergrund-Playfields für Ihre 
Grafik verwendet wird, dann 
sollte man dieses vorher besser 
mit »DualTo(BACK);« in den 
Hintergrund schatten. Die übli¬ 
che CU- oder SDB-Umgebung 
läßt meist noch genügend Platz 
zum »Durchblick« auf die Aus¬ 
gaben. 

Nichts ohne 
Wermutstropfen 

Zum Schluß möchten wir Sie 
noch auf einen Nachteil des 
Dualplayfield-Modus hinwei- 
sen, den Sie in Erwägung zie¬ 
hen sollten. Bei zwei sich über¬ 
lagernden Grafiken, die wo¬ 
möglich noch beide aus zwei 
Bitplanes bestehen, müssen in 
gleicher Zeit genau doppelt so¬ 
viel Daten aus dem Bildspei¬ 
cher ausgeiesen werden, um 
dann zum Bildschirm zu wan¬ 
dern. Bei »LORES«-Grafik, die 
von den meisten Programmen 
für diese Zwecke benutzt wird, 
hat das noch keine bemerkens¬ 
werten Folgen. Bei »HIRES«- 
Grafik, wie der Workbench, 
müssen mit 640 Pixel pro hori¬ 
zontaler Zeile die doppelte An¬ 
zahl Worte aus dem Speicher 
geholt werden. Das hat erhebli¬ 
che Geschwindigkeitsverluste 
für den Prozessor zur Folge, da 
die Grafikchips für ein störungs¬ 
freies Bild auf dem Monitor Vor¬ 
rang beim Speicherzugriff ha¬ 
ben. Somit muß der Prozessor 
im Zweifelsfall warten. 

Bei dem eben erwähnten 
Beispiel beträgt der Geschwin¬ 
digkeitsverlust bis zu 50 Pro- 
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es Spiel 

einen zweiten Monitor ge- 

durch alle Screens und Fenster klicken 

gen Ihnen eine einfachere Lösung. 


zent. Besitzer einer externen wird, je weiter der Screen nach 
Speichererweiterung sind da- unten wandert, also je weniger 
von nicht so hart betroffen, von ihm dargestellt wird. Das 
denn in diesem Fall liegen die bedeutet letztendlich die Frei- 
Programme meist im Fast- gäbe von Zugriffen auf den Da- 
Memory, das von den Grafik- tenbus, weil dieser nicht so 
Chips nicht erreicht wird. Dazu häufig von den Grafik-Chips be¬ 
gleich die Bestätigung: Lassen nötigt wird. 

Sie das Demo-Programm noch Aber auch so dürfte die Lei¬ 
einmal laufen, wobei gleichzei- stung Ihres Amiga wohl kaum 
tig der WorkbenchScreen her- zu stark beeinträchtigt sein. Wir 
untergezogen sein sollte. Es wünschen Ihnen viel Spaß mit 
läßt sich eindeutig beobachten, diesem neuen Utility, 
daß »dual« um so schneller (Christian Wolf^o) 


Computer: A500, A1000, A2000 mit Kickstart 1.2 
Sprache: C 

Compiler: Aztec oder Lattice 

Aufrufe: siehe Text 

Programmautor: Christian Wolf 

1 oIO /»»*»»»»»»»**»»»»*»***»*»»»*»*»**»»»/ 

2 Vu /» dual.c 1989 by Christian Wolf «/ 


3 xi 

/» 

in Spandauer Str. 104L 

*/ 

4 Oi 

/» 

1 Berlin 20 

*/ 

5 iA 

/* 

Tel.: 030/3660450 

»/ 

6 dh 

/» bugs fixed by Heiko Schlichting 

*/ 


7 uO /»»*«»»**»»»»»*»»»»*«»«»»»*»»*»»*»»*/ 

8 PD »inolude < lntultion/lntultionbase.h> 

9 GL #include <exec/pemory.h> 

10 hq #inelude <graphics/gfxbase.h> 

11 Br #ifdef LATTICE 

12 fj #include <proto/all.h> 

13 vC #else 

14 oS #include <functlon8.h> 

15 WS #endlf 

16 Jz #deflne FRONT 1 

17 76 #deflne BACK 0 

18 lY /» Fehlermeldungen: */ 


19 15 #deflne NOTITLE 1 

20 Sx #deflne OUTOFMEH 2 

21 Kt #deflne SORRY_SCREENNOTFOUND 3 

22 MM jjsdeflne WRONGDEPTH 4 

23 yl #define ALREADYSTARTED 5 

24 81 /» Das übliche ... */ 


25 aL atruct IntultlonBase »IntultionBaae; 

26 Cp struct GfxBase »GfxBase; 

27 Ds /» Für den Benuster »/ 

28 XI struct BltMap »DualBitMapj 

29 ow struct RastPort »DualRastPort; 

30 ip /* für private Zwecke, am besten unberührt lassen »/ 

31 It static struct Raslnfo »DualRasInfo; 

32 UW static long planesize; 

33 E6 static struct BltMap »CBltHap; 

34 GX static struct Screen *CSoreen; 

35 dA static BOOL StartFlagiFALSEj 

36 PF static struct View »HyVlew; 

37 rR /* Playfield nach vom oder nach hinten */ 

38 qe void DualTo(Front) 

39 AQl BOOL Front; 

40 a30 [ 

41 aUl if (Front) 

42 c55 { 

43 la6 CScreen->ViewPort.Hodesl=DUALPFlPFBA; 

44 pj MyVlew->Modesl=DUALPFlPFBAi 

45 JE5 I 

46 ZMl eise 

47 hA5 [ 

48 sU6 CScreen->VlewPort.Modesl =DUALPF; 

49 g5 CScreen->ViewPort.Modes8!= (PFBA'Oxffff); 

50 oJ5 ] 

51 2x1 /* keine Guru beim Verschieben des Screens »/ 

52 uH ForbidO; 

53 iX HakeVPort(MyView,HyVlew->VlewPort); 

54 dF /» Um ein Flimmern zu verhindern */ 

55 Ta WaitBOVP(MyView->ViewPort); 

56 19 MrgCop(MyView); 

57 uD /* Display auf jeden Fall einschalten */ 

58 AI LohdView(MyVlew); 


59 G4 PermltO; 

60 yTO j 

61 sq /» Alles wieder freigeben »/ 

62 jT void CloseDualO 

63 xQ { 

64 Rll if (iStartFlag) return; 

65 JD CSoreen->VlewPort.RasInfo->Next=0; 

66 ks CScreen- > VlewPort .Modes"=DUALPFj 

67 ob MyVieu->Modes'=DUALPF; 

68 AX ForbidO; 

69 yc MakeVPort(HyView,MyView->ViewPort); 

70 WN MrgCop(HyVlew); 

71 SG PermltO; 

72 xF if (DualBltMap->Plane8[0]) FreeMem(DualBltMap->Planea[0] 

,planesize); 

73 90 if (DualBitHap->Planes[l]) FreeHem(DualBltMap->Plane8[l] 

,planesize); 

74 n9 if (DualRasInfo) FreeMem(DualRasInfo,(long)slzeof(8truct R 

asinfo)); 

75 es if (DualBltMap) FreeHem(DualBltMap,(long)si2eof(struct Bit 

Map)); 

76 2H if (DualRastPort) FreeMem(DualRastPort,(long)sizeof(struct 

RastPort)); 

77 JT CloseLlbrary((struct Library*)IntultlonBase); 

78 CD CloseLlbrary((8truct Llbrary«)GfxBase); 

79 mn StartFlag«FALSE; 

80 InO j 

81 90 MakeDual(Depth,ScreenTltle) 

82 jZl short Depth; 

83 60 char »SoreenTltle; 

84 110 ( 

85 iz /* Argumente checken »/ 

86 pll if (StartFlag) return ALREADYSTARTED; 

87 cl if (Depth < 1 II Depth > 2) retum(WRONGDEPTH); 

88 kB if (iSereenTitle) return(NOTITLE); 

89 kTO /• Intuition- und GfxLlbrary öffnen, geht NIE schief »/ 

90 dMl IntuitionBase=(struct IntultlonBase »)OpenLlbrary('Intulti 

on.llbrary'jOL); 

91 RF GfxBase»(struct GfxBase *)OpenLibrary('graphics.library',0 

L); 

92 at /* Speicher für verschiedene Strukturen reservieren */ 

93 ml if (!(DualRasInfo=AllocHem((long)sizeof(8truct Raslnfo),ME 

HF_PUBLIC))) 

94 Sv5 ( 

95 ral6 CloseDualO; 

96 4g return OUTOFHEM; 

97 Z45 ) 

98 b81 if (l(DualBltHap=AllocMeni((long)siaeof(struct BltMap),HEMF 

.PUBLIC))) 

99 X05 { 

100 r66 CloseDualO; 

101 91 return OUTOFMEH; 

102 e95 ] 

103 efl If (I(DualRastPort=AllocMeni((long)aizeof(struct RastPort), 

HEMFJ>UBLIC))) 

104 o55 [ 

105 wB 6 CloseDualO; 

106 Eq return OUTOFMEH; 

107 jE5 j 

108 4gl /» Screen mit richtigem Namen suchen »/ 

109 nD CScreen=IntultlonBase->FirstScreen; 

110 QM while (CScreen) 

111 jC8 [ 

112 om9 /» Name gefunden -> DualPlayFleld aktivieren */ 

Listing 1. »dual.c« ist ein Leckerbissen 
für alle Grafik-Freaks 
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113 

22 

114 

mFD 

115 

dNE 

116 

c4 

117 

Vf 

118 

ah 

119 

Fo 

120 

xO 

121 

cG 

122 

Ae 

123 

9o 

124 

yh 

125 

4mK 

126 

yRI 

127 

IXJ 

128 

aC 

129 

5al 

130 

UYE 

131 

3WI 

132 

8sJ 

133 

CuP 

134 

6ZN 

135 

QfO 

136 

IK 

137 

DIN 

138 

Ejl 

139 

qlE 

140 

4p 

141 

re 

142 

Kd 

143 

Rg 

144 

IZ 

145 

Bb 

146 

IX 

147 

IP 

148 

7V 

149 

PuD 



if (!strcinp(ScreenTitle,CScreen->Title)) 

1 

CBitMap=&CSereen->BitMap; 

/* BltMap kopieren */ 

»DualBitMap=»CBitMap; 

/* RastPort kopieren... */ 
»DualRastPort=CScreen->RastPort; 

/* ...und BitMap korrigieren */ 

DualRastPort-> BitMap=DualBitHap; 
MyVietf=GfxBase-> ActiView; 

planesize=CBitHap-> BytesPerRow»CBitHap-> Row 

if (l(DualBitMap->Planes[0) = 

AllocMeiii(planesi2e,MEMF..CHIPl MEHF.CLEAR 

))> 

1 

CloseDualOj 
return OUTOFWEMj 

I 

if (Depth==2) 

[ 

if (l(DualBitMap->Planes[l] = 

AllocMeni(plane3lze,HEHF_CHIPl MEMF_ 
CLEAR))) 

! 

CloseDualO; 
return OUTOFMEH} 


eise DualBitMap->PlanesCl]‘0; 

DualBltMap-> Depth*Depth; 
DualRa3lnfo->BitMap=DualBltMap; 

DualRasInfo-> RxOffset=0: 

DualRasInfo-> RyOffset=0i 
DualRasInfo->Next=0} 

CScreen-> ViewPort.Raslnfo-> Next=DualRasInfo 

DualTo(FRONT); 

StartFlag«TRUE; 
return TRUE; 


150 PG9 CScreen=CScreen-> NextSoreen; 

151 Rw8 ! 

152 LDl return SORRY_SCREENNOTFOUND; 

153 TyO i 

15** RX /* ein kleines Test-Programm «/ 

155 zH void main{) 

156 Sv 1 

157 631 long x,ii 

158 2U int Err; 

159 Kk /» Dualplayfieldmode aktivieren */ 

160 sc if (I(Err=MakeDual{l,"Morkbench Screen'))) 

161 X05 

162 dJ6 


prlntf("Something tias gone urong.. .Error Nr. WXn'.Er 
r); 

exlt(O); 


163 4S exlt(O); 

164 e95 i 

165 lul /* und ein bißchen malen */ 

166 KN for (i=0;l<10il++) 

167 d66 [ 

168 4t DualTo(FRONT)} 

169 cb SetAPen(DualRastPort,lL)} 

170 wG SetDrMd(DualRastPort,JAMl); 

171 VJ for (x=0ix<639;x++) 

172 iBB i 

173 a3C Move(DualRastPort,x,OL)i 

174 Oh Draw(DualRastPort,x,255L); 

175 pKB ! 

176 Da6 DualTo(BACK); 

177 hf SetAPen{DualRastPort,OL); 

176 de for (x»639;x>0!X—) 

179 pIB [ 

160 hAC Move(DualRastPort,x,OL); 

181 Vo Draw(DualRastPort,x,255L)} 

182 wRB 1 

183 xS6 i 

184 QAl /* wieder schließen */ 

185 ET . CloseDualO; 

186 OVO 1 
(C) 1988 M&T 

Listing 1. »dual.c« (Schluß) 


S ie haben Bedenken? 
Stellen Sie sich folgen¬ 
de Situation vor: Man 
möchte beim Booten den Ver¬ 
lauf der »startup-sequence« 
vom Vorhandensein bestimm¬ 
ter Disketten oder Laufwerke 
abhängig machen. So sollte es 
beispielsweise möglich sein, 
bei Vorliegen der Modula-Dis- 
kette das System auf Modula 
vorzubereiten, bei anderen Dis¬ 
ketten entsprechend andere 
MaBnahmen zu ergreifen. Eine 
Fallunterscheidung würde man 
mit -IF EXISTS MODULA:« 
oder »IF EXISTS C-Workdisk:« 
erreichen. Dies hätte das Er¬ 
scheinen eines oder mehrerer 
Requester zur Folge, was nicht 
gerade praktisch ist, da der 
Bootvorgang so die Aufmerk¬ 
samkeit und den Eingriff des 
Benutzers erfordert. 

Mit »remreq« (Listing 1) wird 
das anders. Geben Sie das Li¬ 
sting ein und compilieren es. 
Das Programm läuft sowohl mit 
Aztec- wie auch mit Latttce-C. 
Mit Lattice compilieren Sie mit 
»Ic -L remreq«, Aztek-Besitzer 
verwenden -cc remreq« gefolgt 
von »In remreq -Ic«. 

Wenn Sie die Wirkungsweise 
des Programms testen wollen, 
geben Sie im CLI »remreq« ein, 


Requester ade 

Meldungen wie »No disk present in unit 0« 
oder »Please insert Volume Workbench in 
any drive» rauben dem Benutzer schon 
mal den letzten Nerv. Unser neuer CLI-Be- 
fehl »remreq« macht mit diesen Reque- 
stern endgültig Schluß, 


entnehmen eine eventuell vor¬ 
handene Diskette aus Laufwerk 
dfO: und geben dann »dir dfO;« 
ein. Die Folge ist eine Fehler¬ 
meldung ohne vorherigen Re¬ 
quester. Nochmaliges Einge¬ 
ben von »remreq« versetzt das 
System wieder in den alten Zu¬ 
stand. Wenn Sie Teile der 

In der Kürze 
liegt die Würze 

»startup-sequence« gegen Re¬ 
quester sichern wollen, um¬ 
schließen Sie diese einfach mit 
einem Aufruf von »remreq« vor 
und nach den kritischen Befeh¬ 
len. Das Listing ist so kurz, daß 


wir Ihnen eine ausführliche Er¬ 
läuterung nicht vorenthalten 
können: Normalerweise exi¬ 
stiert zu jedem im CLI gestarte¬ 
ten Prozeß ein Fenster, für die 
Standard Ein- und Ausgabe tä¬ 
tigt. Dazu befindet sich in der 
Prozeß-Struktur eine Kompo¬ 
nente, die auf das entsprechen¬ 
de Fenster für einen Requester 
zeigt oder für das übliche CLI- 
Fenster mit Null initialisiert ist. 
Um diese zu finden, wird die 
Exec-Funktion FindTask aufge¬ 
rufen, die einen Zeiger auf un¬ 
sere Task-Struktur ermittelt. Da 
die Task-Struktur vollständig in 
der Prozeß-Struktur enthalten 
ist, ist der zurückgegebene 
Wert gleichzeitig auch der Zei¬ 
ger auf unseren Prozeß. Das 
machen wir dem Compiler ex¬ 


plizit mit einer Typenumwand¬ 
lung klar: 

(ThisProc=(struct 
Process x)FindTask(OL)) 

Mit einem kleinen Trick gau¬ 
keln wir dem Betriebssystem 
nun vor, daß die Benutzung ei¬ 
nes Requesters nicht mehr 
möglich ist: Die f^mponente 

»pr_WindowPtr« bekommt 

den Wert -1 zugewiesen, so daß 
unser Prozeß (das CLI) an¬ 
nimmt, daß kein Fenster mehr 
für entsprechende Zwecke vor¬ 
handen ist. Um aber den alten 
Wert später wiederverwenden 
zu können, kopieren wir ihn vor¬ 
her in ein passendes Element 
der Task-Struktur, das für den 
Benutzer zur freien Verfügung 

steht (»ThisProc-> pr_Task. 

tc_UserData«). Bei einem er¬ 

neuten Aufruf von »remreq« 
passiert dann genau das Ge¬ 
genteil: der »pc_WindowPtr« 

wird restauriert. 

Da natürlich jeder Prozeß ei¬ 
ne eigene Prozeß-Struktur hat, 
ist konsequenterweise die Wir¬ 
kung von »remreq« nicht global, 
sondern auf den aktiven Prozeß 
beschränkt. Das ist nicht unbe¬ 
dingt ein Nachteil, da dieser Be¬ 
fehl seinen Sinn gerade durch 
den gezielten Einsatz erhält. 

(Christian Wolf) 
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Programmname: RemReq __ 

Computer: A500, A1000, A2000 mit Kickstart 1.2 

Sprac he: C _ 

Compiler: Aztek oder Lattice 

Aufrufe: siehe Text 

Programmautor; Christian Wolf 

1 usO #include <librarie8/(io8exten8.h> 

2 21 #lfdef LATTICE 

3 tfa #include <proto/all.h> 

4 m3 #else 

5 fJ #include <functlons.h> 

6 KJ #endif 

7 oA maln() 


9 enl struct Process *Thi8Proc={struct Prooess »)FlndTask(OL); 

10 Zd if {ThlsProc->pr_WlndowPtr 1= -1) 

11 7a5 ( 

12 zr6 ThisProc-> pr_Task.to_UserDatasThi8ProC“> pr_WlndowPtr 


13 ql 

14 Ej5 

15 4rl eise 


ThisProe->pr_WindotfPtr = -Ij 


ThisProc-> pr_WindowPtr=Thi8Proc-> pr_Ta8k.to.UserData 


18 rC 

19 Jo5 i 

20 KpO ) 

21 

(C) 1989 H&T 


ThisProc-> pr_Task.tc_UserData*0; 


Listing 1. »remreq.c« verbannt 
die System-Requester 


Aus unserem Bücher- 


Wer die Fähigkeiten des Amiga ausnut¬ 
zen möchte, braucht eine gute Anlei¬ 
tung. Die Handbücher zum Amiga und 
zu den verschiedenen Programmier¬ 
sprachen beschränken sich meist auf 
den Hinweis, sie seien nicht als Lehr¬ 
buch gedacht. Viele Bücher er¬ 
heben den Anspruch, die¬ 
se Lücke zu schlie- 
ßen. Lesen Sie auf 
den folgenden Sei- /Ä# 
ten, welche für Sie A^jjvyibL v 
richtig sind. 

Programmier- 

Praxis Intuition 

»Es gibt zu viele Bücher über 
den Amiga, die viel zuwenig 
behandeln.« Um mit dieser Un¬ 
sitte aufzuräumen, ist Peter 


Regal 




iSC 


Wollschtaeger mit seinem Buch 
»Programmierpraxis Intuition« 
angetreten - und er erledigt 
dies gründlich. 

Der Amiga steht in dem Ruf, 
ein ausgesprochen komplizier¬ 
tes Betriebssystem zu haben. 
Die zugehörige Dokumentation 
umfaßt vier dicke Bände. Wäh¬ 
rend andere Computer oft nicht 
mehr als einen Kommando-In¬ 
terpreter bieten, kann der Ami¬ 
ga weit mehr. Arbeiten in meh¬ 
reren Fenstern gleichzeitig, 
Programmsteuerung mit Maus 
und Menüs sind selbstver¬ 
ständlich. 

Aber leichte Bedienbarkeit 
und Multitasking haben auch 
Nachteile. Als Programmierer 
müssen Sie sich beim Amiga 
um weit mehr kümmern als bei 
einfacheren Computern. Sie 
müssen eine große Anzahl 
Strukturen und Funktionen 
kennen und wissen, wie diese 
angewendet werden. 


Diese für alle Teile des Be¬ 
triebssystems zu beschreiben, 
würde entweder zahlreiche 
Bände füllen oder unvollständig 
bleiben. Peter Wollschlaeger 
wählt in seinem Buch eine ele¬ 
gante Alternative. Er be¬ 
schränkt sich auf einen über¬ 
schaubaren Teil des Gesamtsy¬ 
stems und bietet für diesen eine 
übersichtliche und solide Be¬ 
schreibung. 

In »Programmierpraxis Intui¬ 
tion« finden Sie eine ausführli¬ 
che Anleitung zur Programmie¬ 
rung der Amiga-Benutzerober- 
fläche. Voraussetzung sind 
Kenntnisse von C oder Assem¬ 
bler. Wer in einer dieser Spra¬ 
chen programmiert, wird sich in 
diesem Buch schnell zurecht¬ 
finden. Es geht auf alle Aspekte 
der Intuition-Programmierung 
ein und bietet zu jedem Gebiet 
Beispielprogramme, die auf 
Diskette dem Buch beiliegen. 


Angenehm fällt auf, daß in C 
nur Routinen verwendet wur¬ 
den, die sowohl mit dem Aztec- 
als auch mit dem Lattice-Com- 
piler Zusammenarbeiten. As¬ 
sembler-Programmierer finden 
am Ende jedes Kapitels eine 



Umsetzung der wichtigsten 
Beispielprogramme. 

Nach einer Einführung, die 
intensiv auf die Grundlagen der 
Intuition-Programmierung ein¬ 
geht, erfährt der Leser alles 
Wissenswerte über die Pro¬ 
grammierung von Screens, 
Windows und der dazugehöri¬ 
gen Bedienungselemente (Me¬ 
nüs, Gadgets und Requester). 
Der Anhang macht das Buch zu 
einem Nachschlagewerk, das 
man auch nach langen Pro¬ 
grammierstunden nicht aus der 
Hand legt. Hier sind alle ver¬ 
wendeten Datenstrukturen 
nochmals in C- und Assembler¬ 
schreibweise dokumentiert. 

»Programmierpraxis Intui¬ 
tion« ist für jeden, der sich mit 
diesem Thema auseinander¬ 
setzt, ein unbedingtes Muß.(sc>j 

Peter Wollschlaeger, Programmierpraxis Intui¬ 
tion, M&T Verlag, 328 Seiten. ISBN 3-89090- 
593-5, Preis 69 Mark 
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Amiga Intern 

Der Name »Intern« ruft bei 
Umsteigern vom C64 Erinne¬ 
rungen wach. Mit dem »64 In¬ 
tern« setzte Data Becker Maß¬ 
stäbe. Wird Amiga Intern im 
zweiten Anlauf diesem An¬ 
spruch gerecht? 

Die erste Auflage von Amiga 
Intern bezog sich nur auf einen 
Teilbereich des Amiga-Be- 
triebssystems. Diezweite Aufla¬ 
ge erscheint schon äußerlich 
stark verändert: Der erste Band 
(der mit der ursprünglichen er¬ 
sten Auflage teilweise identisch 
ist) enthält jetzt nur noch die Be¬ 
reiche Hardware, Exec und 
AmigaDOS. Zusätzlich wurde 
er durch einen zweiten Band 
zum Thema Libraries und Devi¬ 
ces ergänzt. 

Dieses tonzept kommt dem 
komplizierten Betriebssystem 
des Amiga weit besser entge¬ 
gen, als dies in der ersten Aufla¬ 
ge der Fall war. Im ursprüngli¬ 
chen »Intern« wurden wichtige 
Teilbereiche nur kurz angeris¬ 
sen. Dagegen erhält der Pro¬ 
grammierer mit der zweiten 
Auflage grundlegende Informa¬ 
tionen zu allen Bereichen des 
Betriebssystems. 

Außer einigen Ergänzungen 
(besonders zum Amiga 2000) 
wurde das erste Kapitel zum 
Thema Hardware fast unverän¬ 
dert übernommen. Angesichts 
der Qualität der ersten Auflage 
in diesem Bereich ist diese Ent¬ 
scheidung sicher gerechtfer¬ 
tigt. 

Alle anderen Kapitel wurden 
dagegen sehr gründlich über¬ 
arbeitet: 

So ist ein eigenes Kapitel mit 
Hinweisen zur »sauberen« Pro¬ 
grammierung unter Multitas¬ 
king-Bedingungen enthalten. 
Der »Exec«-Teil wurde um je ein 
Kapitel zu sogenannten »Sema- 
phores« und zum Booten aus 
der RAM-Disk erweitert. 

Der AmigaDOS-Teil wurde 
komplett umgestaltet. Er um¬ 
faßt jetzt endlich eine vollständi¬ 
ge Dokumentation aller für den 


Programmierer wichtigen Da¬ 
ten wie DOS-Bibliothek, Stan- 
dard-Ein-/Ausgabe, Händler, 
Devices und Disk-Format. Der 
interne Aufbau eines Amiga- 
DOS-Programms - einschließ¬ 
lich Code-Segmentierung und 
Hunks - wird ausführlich be¬ 
schrieben. Außerdem wird auf 
die Neuerungen der Kickstart 
1.3 eingegangen (beispielswei¬ 
se Fast-Filing-System). 

Neu in der zweiten Auflage 
sind die Kapitel über »Expan¬ 
sionsarchitektur« und »Janus¬ 
konzept«. Während ersteres 
wohl eher für Hersteller von Er¬ 
weiterungshardware interes¬ 
sant ist (für diese aber viel zu 
knapp), beschreibt das zweite 
die Interna der Schnittstelle zur 
MS-DOS-Welt, des »Bridge¬ 
boards«. Wer eine Brückenkar¬ 
te im Amiga 2000 besitzt, findet 
hier - neben dem »Amiga 
System-Handbuch« - die einzi¬ 
ge deutschsprachige Beschrei¬ 
bung dieser Schnittstelle. 

»Intern Band 2« ist mehr als 
nur die Fortsetzung von Band 1. 
Nachdem die - vorher viel zu 
knapp gehaltenen - Kapitel 
über Libraries und Devices aus 
Band 1 herausgefallen sind, ist 
diesem wichtigen Thema ein ei¬ 
gener Band von über 800 Sei¬ 
ten gewidmet. Natürlich ist das 
Intern kein Lehrbuch für Sy¬ 
stemprogrammierer. Dennoch 
sind im ersten Kapitel viele 
nützliche Hinweise zu Pro- 
grammier-tonventionen unter 
Multitasking enthalten. Die an¬ 
deren Kapitel sind eher als 
Nachschlagewerk zu den ein¬ 
zelnen Betriebssystemteilen 
aufgebaut. 




Beispielsweise beschreiben 
die ersten 250 Seiten ausführ¬ 
lich die Programmierung der 
Devices anhand von Beispielen 
mit Parallel-, Serial-, Printer-, 
Gameport-, Input-, Timer- und 
Trackdisk-Device. 

Nach einer kurzen Beschrei¬ 
bung des IFF-Formats und sei¬ 
ner Varianten für Grafik, Text, 
Musik und Samples geht es in 


die Vollen: Fast 500 Seiten sind 
den Libraries gewidmet. Natür¬ 
lich können die Amiga-Libraries 
auch bei diesem Umfang nicht 
abschließend behandelt wer¬ 
den. Dennoch wird für jede 
Routine einschließlich der neu¬ 
en Libraries der Kickstart 1.3 
(beispielsweise »Romboot«- 
Library) in einer Kurzübersicht 
die Syntax und die Funktion der 
jeweiligen Routine beschrie¬ 
ben. Besonders hilfreich sind 
die Überschriftsbalken mit dem 
Namen der Routine und einer 
Stichwort-Beschreibung der 
Aufgaben (beispielsweise »Ailo- 
cate: Belegt einen Speicher¬ 
block«). 

Das letzte Kapitel geht auf die 
Preferences-Datenstruktur ein. 
Neben einer Aufstellung der 
von Preferences verwalteten 
Daten (und der Beschreibung 
des Zugriffs auf diese Daten) 
sind besonders die Tips zu 
Druckertreibern und Fonts in¬ 
teressant. 

Beide Bände des Intern sind 
jeder für sich ein unabhängiges 
Nachschlagewerk, in dem Sie 
immer wieder neue interessan¬ 
te Anregungen für eigene Ex¬ 
perimente finden werden. Auf 
den ersten Blick erscheint der 
Preis von insgesamt fast 140 
Mark etwas hoch, aber diese 
geballte Information auf 1500 
Seiten finden Sie in keinem an¬ 
deren Werk. Wer sich für die 
Programmierung mit Hilfe der 
Systemroutinen interessiert, 
sollte dieses Werk nie weiter als 
eine Armlänge von der Tastatur 
entfernt aufstellen. (so) 

Olttrlch. Gelfand, Amiga Intern Band 1. 
Schemmel, Data Becker, 716 Selten, ISBN 
3-89011-104-1. Preis 69 Mark 
Bleek, Jennrich, Schulz, Amiga Intern Band 2, 
Data Becker, 860 Seiten, ISBN 3-89011-268-4, 
Preis 69 Mark 

AmigaDOS- 

Handbuch 

AmigaDOS ist mehr als nur 
das für jeden sichtbare CLI. 
Wer sich entsprechend infor¬ 
miert, kann mit Hilfe dieses Be¬ 
triebssystemteils komfortabel 
auf Diskette zugreifen, eigene 
»Prozesse« in der Multitasking- 
Umgebung installieren und vie¬ 
les mehr. 

Die Fakten soll dieses Buch 
vermitteln. Es handelt sich um 
die Übersetzung der engli¬ 
schen Entwicklerdokumenta¬ 
tion zu AmigaDOS. Diese be¬ 
steht im Original aus drei Bän¬ 
den. In der deutschen Version 
wurden alle drei zu einem Band 
zusammengefaßt. 

Der erste Abschnitt enthält 
alle wichtigen Informationen 
zum CLI. Der Einsteiger findet 
alles Wissenswerte zur Bedie¬ 


nung der Ein- und Ausgabege¬ 
räte (Laufwerke, Tastatur, Bild¬ 
schirm, etc.). Die Übersicht zu 
den CLI-Befehlen stellt jeden 
einzelnen Befehl kurz vor, er¬ 
klärt die Wirkungsweise und 
die Anwendung anhand von 
Beispielen. Am Ende befindet 
sich eine Kurzreferenz zu allen 
CLI-Kommandos und eine Be¬ 
schreibung der mitgelieferten 
Editoren »Ed« und »Edit«. 

Neben der Benutzeroberflä¬ 
che bietet AmigaDOS eine Viel¬ 
zahl von Routinen, die vom Pro¬ 
grammierer genutzt werden 
können. Diese befinden sich in 
der »dos.library« und können 
von fast allen Programmier¬ 
sprachen angesprochen wer¬ 
den. Im zweiten Buchteil wer¬ 
den zunächst Hinweise zur Pro- 


Maikl&ltKtvIk 



grammierung unter AmigaDOS 
gegeben. Darauf folgt eine Dar¬ 
stellung aller AmigaDOS-Routi- 
nen und deren Anwendung in 
eigenen Programmen. Eine Be¬ 
schreibung des Metacomco- 
Assemblers und des »ALink«- 
Linkers bilden den Abschluß. 

Das dritte Buch heißt im Ori¬ 
ginal »Technical Reference Ma¬ 
nual« und geht sehr tief auf die 
Details der Implementierung 
dieses Betriebssystemteils ein. 
Dieser Teil klingt zweifellos 
selbst für fortgeschrittene Pro¬ 
grammierer nach böhmischen 
Dörfern. Hier werden neben 
dem Aufzeichnungsformat der 
Diskette auch die Struktur von 
AmigaDOS-Prozessen und 
»Hinweise für den fortgeschrit¬ 
tenen Entwickler« behandelt. 

Die Dreiteilung dieses Bu¬ 
ches ist sicher auf den ersten 
Blick problematisch. Denn 
durch die überaus große the¬ 
matische Spannweite ist für je¬ 
de Zielgruppe stets nur ein Aus¬ 
schnitt um etwa einem Drittel 
der Seiten interessant. Der 
Rest wird schnell als langweilig 
oder für zu schwierig einge¬ 
stuft. Andererseits ist dies ein 
Buch, das Sie auf Ihrem Weg 
vom CLI-Einsteiger bis zum 
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Profi-Programmierer begleitet. 
Sicher werden Sie immer nur 
einen Teil als Nachschlagewerk 
benutzen, aber dieser ist enorm 
hilfreich. (so) 

Commodore'Amiga Inc., AmlgaDOS-Hand- 
buch, M&T Verlag. 342 Seiten, ISBN 3-89090- 
465-3, Preis 59 Mark 

Das große 
C-Buch 

Nachdem ich zum erstenmal 
ein C-Programm gesehen hat¬ 
te, war mein Eindruck ein ver¬ 
nichtender: Wer C lernen will, 
sollte viel Geduld und Verständ¬ 
nis für pharaonische Schreib¬ 
weisen mitbringen. Vergessen 
Sie’s. 

Wenn Sie Hieroglyphen ver¬ 
wenden wollen, ist das Ihre Sa¬ 
che. Es geht jedenfalls auch oh¬ 
ne. C ist eine Programmierspra¬ 
che wie jede andere, nur kürzer 
in der Ausdrucksweise. Sie 
kommt also der Spezies von 
Programmierern entgegen, die 
ellenlange Ausdrücke verab¬ 
scheuen. 

Diese werden aufdemAmiga 
zusätzlich unterstützt: Eine 
Vielzahl von Systemroutinen 
können vom Programmierer 
genutzt werden (warum das 
Rad noch einmal erfinden?). C 
überzeugt bei der einfachen 
Nutzung dieser Routinen. 

»Das große C-Buch« ist kein 
Buch für den Einsteiger - auch 
nicht für den sehr engagierten. 
Sie sollten also die Sprachele- 
mente von C bereits beherr¬ 
schen, bevor Sie dieses Buch 
aufschlagen; denn dieses ver¬ 
liert keine Zeit mit langen Vorre¬ 
den und Erklärungen - es geht 
sofort ans Eingemachte. 

Die ersten beiden Kapitel ge¬ 
ben einen tiefen Einblick in die 
Funktionsweise des Aztec- 
Compilers. Die Autoren wollen 
hiermit aber keineswegs einen 
Ersatz für das Handbuch bie¬ 
ten. Vielmehr liefert dieser Teil 
zahlreiche Tips und Tricks für 
die professionelle Nutzung die¬ 
ses Compilers. 



DÜCHER 


Das folgende Kapitel ist eine 
wahre Fundgrube für jeden In¬ 
tuition-Programmierer. Es be¬ 
handelt alle Aspekte dieses Be¬ 
triebssystemteils, angefangen 
von Screens und Windows über 
Menüs und Gadgets bis zu 
Speicherverwaltung und Mes¬ 
sagesystem. Jeder Bereich 
wird durch detaillierte Anwen¬ 
dungsbeispiele »gewürzt«, die 
den Stoff leichter verdaulich 
machen. 

Den krönenden Abschluß bil¬ 
det ein ausführliches Projekt, 
das von der Planungsphase bis 
zum fertigen Programm be¬ 
schrieben wird. Ein selbstge¬ 
bauter Editor ist der Lohn der 
Mühe, wobei das hier gewonne¬ 
ne Wissen weit über den vorher 
behandelten Bereich hinaus¬ 
geht. Übrigens scheinen die 
Autoren vom Itonzept dieses 
Editors sehr überzeugt gewe¬ 
sen zu sein: Der »EdWork«, der 
von Data Becker als kommer¬ 
zielles Programm vertrieben 
wird (siehe Editorentest auf Sei¬ 
te 8), basiert größtenteils auf 
diesem Projekt. 

»Das große C-Buch« ist für 
den fortgeschrittenen Program¬ 
mierer ein erstklassiges Lehr¬ 
buch zur Betriebssystem-Pro¬ 
grammierung. Die wichtigsten 
Techniken werden anhand in¬ 
teressanter Beispiele - zumeist 
aus dem Bereich Intuition - an¬ 
schaulich erklärt. (so) 

Blsek, Jennrich, Schulz, Das große C-Buch, 
Data Becker, 681 Seilen, ISBN 3-89011-191-2; 
Preis 69 Mark 


Amiga 

Assembler-Buch 

Es gibt genügend Program¬ 
mierer, die den Sinn von As¬ 
sembler für den Amiga grund¬ 
sätzlich in Frage stellen. Fast al¬ 
le Probleme lassen sich ebenso 
gut (und anschaulicher) in einer 
Hochsprache lösen. Dennoch 
sind die »Bitfledderer« noch 
nicht ausgestorben. 

Dies liegt zum einen an den 
Umsteigern von anderen Com¬ 
putern, die Assembler als einzi¬ 
ge Möglichkeit kennen, ihren 
Computer wirklich auszurei¬ 
zen. Zum andern ist für viele 
Einsteiger ein C-Compiler zu 
teuer. 

Ein Buch, das sich an den 
engagierten Einsteiger ebenso 
richtet wie an den Umsteiger 
von anderen Computern, ist 
das Amiga Assembler-Buch 
von Peter Wollschlaeger. Nach 
drei theoretischen Kapiteln zur 

/tesembler-Programmierung 
geht es »ganz schnell zur Pra¬ 
xis«. Anhand kurzer Beispiele 
zeigt der Autor die Lösung typi¬ 
scher Programmierprobleme in 



Assembler (Verzweigungen, 
Schleifen, Ein- und Ausgabe). 

Nachdem das Handwerks¬ 
zeug erarbeitet ist, geht es so¬ 
fort in die Vollen: Der komplette 
68000er-Befehlssatz wird be¬ 
leuchtet, die wichtigsten Berei¬ 
che des Betriebssystems wer¬ 
den kurz gestreift und ein Kapi¬ 
tel befaßt sich ausführlich mit 
dem Einbinden von Assembler- 
Routinen in Basic. 

Der Anhang besteht neben 
einer kompletten Befehlsliste 
aus einer Zusammenstellung 
der sogenannten »Library Vec- 
tor Offsets«, die zum Aufruf der 
Betriebssystemroutinen benötigt 
werden, sowie einer Kurzrefe¬ 
renz der Funktionen und Daten¬ 
strukturen. 

Das Assembler-Buch ist der¬ 
zeit das beste Lehrwerk für alle, 
die den Einstieg in die 

Assembler-Programmierung 
wagen möchten. Wollschlaeger 
macht sehr deutlich, in welchen 
Situationen Assembler sinnvoll 
ist und wo nicht. Der Einsteiger 
wird das Buch auch dann nicht 
aus der Hand legen, wenn er 
sich längst als Fortgeschritte¬ 
ner oder Profi betrachtet. Aller¬ 
dings ist zum Verständnis nicht 
nur aufmerksames Lesen, son¬ 
dern eine Menge Übung not¬ 
wendig. Auch kommt man bei 
den Kapiteln zur Intuition- und 
Exec-Programmierung nicht 
ohne zusätzliche Informationen 
aus. Eine umfassende Behand¬ 
lung dieser Themen hätte den 
Rahmen des Buches ge¬ 
sprengt. 

Wer seinen Amiga in Assem¬ 
bler programmieren möchte 
und Erfahrungen in einer ande¬ 
ren Sprache mitbringt, kann zur 
Zeit kein besseres Buch finden. 
Besonders die einfache, locke¬ 
re Ausdrucksweise ist bei Bü¬ 
chern zu diesem Thema eine 
echte Rarität. 

Der Assembler-Kurs von Sei¬ 
te 74 basiert auf diesem Buch. 
Die Beispiel-Listings sind dem 
Buchmaterial entnommen, (so) 

Peter Wotlschlaeger, Arpiga Assembler-Buch, 
M&T Verlag, 329 Seiten! ISBN 3-89090-525-0, 
Preis 59 Mark 


Amiga- 

Programmier- 

handbuch 


Jeder erfahrene Amiga-Pro- 
grammierer weiß, daß ein Buch 
von knapp 400 Seiten nicht alle 
Geheimnisse des Amiga ent¬ 
hüllen kann. So gesehen sollte 
man mit dem Titel »Program¬ 
mierhandbuch« für solch ein 
dünnes Bändchen ruhig etwas 
vorsichtig umgehen - für einen 
kleinen Hinweis auf den tat¬ 
sächlichen Inhalt wäre der po¬ 
tentielle Käufer sicher dankbar. 

Hat man sich damit abgefun¬ 
den, daß auch dieses Buch - er¬ 
wartungsgemäß - nur einen 
Ausschnitt des Betriebssy¬ 
stems behandelt, findet man im 
Innern so manches Goldstück: 

Das Programmierhandbuch 
ist ein umfassendes Nach¬ 
schlagewerk zu Intuition. Die 
»Intuition.library«, die »Gra- 
phics.library« und die mathe¬ 
matischen Funktionen werden 
auf ähnliche Weise behandelt 
wie im »Amiga Intern«, aller¬ 
dings ausführlicher. 

Einem Kapitel zu Prinzipien 
der Programmierung in C fol¬ 
gen die Themen Screens und 



Windows, Grafikroutinen, Pro¬ 
grammbedienung und Ein-/ 
Ausgabe. Ein abschließender 
Sonderteil enthält »Vermisch¬ 
tes« zu Themen anderer Berei¬ 
che. Diese sind allerdings zu 
kurz beschrieben, um wirklich 
hilfreich zu sein. 

Einen guten Eindruck hinter¬ 
läßt das Konzept, ein Nach¬ 
schlagewerk zu bieten, das 
durch ausführliche Programm¬ 
beispiele aufgelockert wird. 
Das Amiga-Programmierhand- 
buch ist ein Nachschlagewerk 
zu den Themen Intuition und 
Grafik. Es ist schwer verdaulich 
für den Intuition-Anfänger, aber 
als begleitende Literatur bei¬ 
spielsweise zu »Programmier¬ 
praxis Intuition« gut geeignet. 

(so) 

Frank Kremser und Jörg Koch, Amiga-Pro- 
grammierhandbuch, M&T Verlag, 387 Seiten, 
ISBN 3-69090-491-2, Preis 69 Mark 
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Amiga System- 
Handbuch 

Obwohl es den Amiga schon 
einige Zeit gibt, sind Bücher, die 
seine Hardware beschreiben, 
eine Seltenheit. Das System- 
Handbuch ist so ein Hardware- 
Buch. Die Technik des Amiga 
wird umfassend und genau do¬ 
kumentiert. Was ebenso wich¬ 
tig ist: Die Programmierung der 
Hardware wird mit zahlreichen 
Programmbeispielen in C und 
Assembler demonstriert. 

Die Autoren beginnen mit ei¬ 
nem {fast historischen) Abriß 
der Amiga-Entwicklung vom 
»alten« A 1000 über den A 500 
bis zum Modell A 2000B. Nach 
einer grundsätzlichen Erläute¬ 
rung der Architektur dieser Sy¬ 
steme folgen genaue Beschrei¬ 
bungen des Bootvorgangs, des 
Prozessors und der Custom- 
Chips. Mit einem Intensivkurs 
über Blitter-, Copper- und 
Audio-Hardware wird der Leser 
zum Kenner der Grafik- und 
Musiktechnik. Aber auch die 
unterschiedlichen Steckplätze 
der Amiga-Modelle sowie die 
gesamte itommunikation mit 
der Außenwelt werden durch¬ 
leuchtet. Dazu gehören Schnitt¬ 
stellen zu den Diskettenlauf¬ 
werken, die serielle und paralle¬ 
le Schnittstelle, Tastatur und 
Maus, die MS-DOS-Hardware 
wie Sidecar oder PC-Karte, 
mögliche RAM-Erweiterungen 



und die Monitoranschlüsse. 
Dabei beschreibt das Autoren¬ 
duo die beteiligten Hardware¬ 
komponenten detailliert. Die 
Programmbeispiele behandeln 
schwerpunktmäßig die unmit¬ 
telbare Programmierung der 
Systemregister, aber auch auf 
der Betriebssystemebene wird 
die Anwendung der Hardware 
eindrucksvoll und doch über¬ 
schaubar demonstriert. Er¬ 
gänzt werden die Beschreibun¬ 
gen durch viele Grafiken und 
Farbfotos der Amiga-Chips und 
Systemplatinen. Gekrönt ha¬ 
ben die Autoren ihr Werk mit 


Bastelanregungen vom »einfa¬ 
chen« PAL-Modulator bis hin zu 
einem Genlock-Interface oder 
einem Digitizer mit Schaltplä¬ 
nen und Bestückungslisten so¬ 
wie einer vollständigen Be¬ 
schreibung der Janus-Library 
und der Expansion-Library. 

Dieses Buch ist eine Fund¬ 
grube für jeden, der sich mit der 
Hardware des Amiga beschäf¬ 
tigt. Wer die Beispielprogram¬ 
me auf der beiliegenden Disket¬ 
te startet, bekommt einen Ein¬ 
druck davon, was man auf und 
mit dem Amiga alles machen 
kann, wenn man die Möglich¬ 
keiten des Systems nur richtig 
zu nutzen weiß. 

Georg Zweschper^o 

Koch/Kremser, Amiga System-Handbuch, 
Markl&Technik, 421 Selten, Preis 79 Mark 

Amiga - Eine 
Einführung in die 
Assembler¬ 
programmierung 

Ein Buch, das mit dem Wort 
»Einführung« im Titel wirbt, 
spricht in elfter Linie Einsteiger 
an. Diese sind jedoch mit die¬ 
ser »Einführung« restlos über¬ 
fordert. 

Nikolaus Laber setzt beim 
Leser eine Menge voraus: Die¬ 
ser sollte mit den Grundlagen 
der Digitaltechnik vertraut sein, 
mindestens eine Programmier¬ 
sprache beherrschen und den 
Amiga gut kennen. Wenn er au¬ 
ßerdem etwas Assembler-Er¬ 
fahrung mitbringt, ist dieses 
Buch bestens für ihn geeignet. 

Bereits vom ersten Kapitel an 
(»Die Hardware«) wird ein atem¬ 
beraubendes Tempo vorgelegt. 
Das kommt Lesern mit einigen 
Erfahrungen ungemein entge¬ 
gen; sie brauchen nicht - wie in 
vielen anderen Büchern - die 
Seiten mit längst bekannten 

Grundlageninformationen 
überblättern. Die wichtigsten 
Grundlagen wie Hardware, Auf¬ 
bau des Betriebssystems oder 
Bedienung des Assemblers 
werden in kompakter Form auf 
den ersten 130 Seiten abgehan¬ 
delt. 

Im fünften Kapitel wird der 
Leser mit der Assemblerpro¬ 
grammierung des Amiga ver¬ 
traut gemacht. Die Beispielpro¬ 
gramme kommen fast aus¬ 
schließlich aus dem Bereich 
der Programmierung mit Intui¬ 
tion. Der Zugriff auf andere Be¬ 
triebssystembereiche sollte je¬ 
doch mit dem hier erarbeiteten 
Wissen und einigen Informatio¬ 
nen aus ergänzender Literatur 
kein Problem mehr sein. 

Den Abschluß bilden die - 
besonders für Seka-Program- 


mierer wichtigen - Offsetlisten 
der Systembibliotheken. Hier 
finden Sie alle Routinen ein¬ 
schließlich der Registerbele¬ 
gung. 

Die »Einführung in die As¬ 
semblerprogrammierung« ist 
ein sehr gutes Lehrbuch. Es 
richtet sich jedoch keinesfalls 
an den Einsteiger, Sie sollten 
beim Erwerb dieses Buches be¬ 
reits einiges an Grundwissen 
mitbringen. Wenn Sie bei¬ 
spielsweise den Assemblerkurs 
in diesem Heft intensiv bearbei¬ 
tet haben, ist dieses Buch ge¬ 
nau richtig für Ihre »Fortbil¬ 
dung«. (so) 

Nikolaus Uber, Amiga-Eine Einführung indie 
Assembterprogrammierung. Addison-Wesley, 
ISBN 3-89019-145-3,324 Seiten, Preis 68 Mark 

System¬ 
programmierung 
in C 

Neben der inzwischen in im¬ 
mer größerer Zahl erscheinen¬ 
den deutschen Amiga-Literatur 
sind die Übersetzungen eng¬ 
lischsprachiger Werke für Ami- 
ga-Anwender und -Program¬ 
mierer interessant. Zu dieser 
Sparte zählt auch »Systempro¬ 
grammierung in C« (Originalti¬ 
tel: Inside the Amiga) von John 
Thomas Berry. 

In der »Einführung« findet der 
Programmierer eine Kurzbe¬ 
schreibung von Hardware und 
Betriebssystem des Amiga so¬ 
wie einige Anmerkungen zum 
Aufbau des Buches. »Die Pro¬ 
grammierung des Amiga« stellt 
Arbeitsweise und Anwendung 
eines C-Compilers (Lattice) in¬ 
nerhalb der Systemumgebung 
des Amiga und einige spezielle 
Datentypen vor, die bei der Pro¬ 
grammierung zum Einsatz 
kommen. »Wie man Intuition 
benutzt« - dieser Titel spricht 
für sich: Hier werden die wich¬ 
tigsten Intuition-Elemente 
(Screens, Fenster, Menüs, Gad- 
gets, Requester) und deren 
Programmierung vorgestellt. 


Dabei geht der Autor auch recht 
ausführlich auf die Program¬ 
mierung von Ein-/Ausgabeope- 
rationen (IDCMP, console.devi- 
ce) unter Intuition ein. Das Kapi¬ 
tel »Prozeßkontrolle und Amiga- 
DOS« bietet einen Einblick in 
das Multitasking-Betriebssy¬ 
stem des Amiga und erklärt die 
Grundbegriffe seiner Program¬ 
mierung. Für den erfahrenen 
Programmierer ist diese Erklä¬ 
rung ausreichend; der Anfän¬ 
ger wird sich damit schwer tun. 

»Zeichnen mit Intuition« er¬ 
klärt die Zeichenfunktionen, die 
dem Programmierer unter Intui¬ 
tion zur Verfügung stehen. Zu¬ 
sätzlich werden noch einige der 
Grafikfunktionen der Grafikbi¬ 
bliothek des Amiga vorgestellt. 
»Sprites bewegen« behandelt al¬ 
le nötigen Funktionen und Struk¬ 
turen, um Sprites zu definieren 
und in eigenen Programmen 
einzusetzen. 

Mit »Die Programmierung 
von Klängen« demonstriert der 
Autor die Verwendung des Ami¬ 
ga zur Klangerzeugung. Dabei 
werden erst einige allgemeine 
Grundlagen zur Erzeugung von 
Klängen und danach die Ami- 
ga-Programmierung im spe¬ 
ziellen vorgestellt. Der Ab¬ 
schnitt »Künstliche Sprache« 
widmet sich der Sprachausga- 
be mit den im Amiga zur Verfü¬ 
gung stehenden Möglichkei¬ 
ten. »Programmierung mit Dis- 
ketten-Dateien« bildet den Ab¬ 
schluß des Buches. 

Natürlich kann auf etwas 
über 400 Seiten nur ein kleiner 
Ausschnitt des Amiga-Be- 
triebssystems behandelt wer¬ 
den. Das Buch ist trotz der in ei¬ 
nigen Kapiteln zu kurz gerate¬ 
nen Funidionsbeschreibungen 
engagierten C-Prc^rammie- 
rern zu empfehlen. Sie werden 
die in diesem Werk zusammen¬ 
gefaßten und damit schnell ver¬ 
fügbaren Informationen bei der 
Programmierung schätzen. 

(Ingolf Krüger^o) 

John Thomas Berry. Systemprogrammierung 
ln C Tewt Verlag GmbH. 454 Seiten, ISBN 
3-921Ba3-71-3, Preis 59 Mark 
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Umfrage 





Der Gewinner 


Thomas Steininger heißt der 
strahlende Gewinner bei unse¬ 
rer Leserumfrage. Thomas ist 
15 Jahre alt und wohnt in Ai- 
iershausen. Er besucht zur Zeit 
die 8. Kiasse der Realschule 
Freising. Am Informatikunter¬ 
richt nimmt er besonders inten¬ 
siv teil. Hier iernt er alie Grund¬ 
lagen für die Programmierung 
des Amiga, den er seit fast zwei 
Jahren besitzt. 

Mit Amiga-Basic begann er, 
heute ist ihm diese Sprache zu 
langsam. Mit dem Umstieg auf 
Moduls will Thomas die Lei¬ 
stungsfähigkeit des Amiga voll 
nutzen. Neben der Program¬ 
mierung beschäftigt er sich mit 
Grafik- und Musikprogrammen 
und kleinen Hardware-Baste¬ 
leien. 

Thomas freut sich sehr über 
das Doppellaufwerk, mit dem 
er jetzt noch professioneller mit 
dem Amiga arbeiten kann. 


schlechte Noten. 20 Prozent 
gaben hier die Note 5, 24 Pro¬ 
zent sogar eine 6. Natürlich ver¬ 
stehen wir, daß 16 Mark im Ge¬ 
gensatz zum Preis für das mo¬ 
natlich erscheinende AMIGA- 
Magazin (7 Mark) sehr viel er¬ 
scheint. Aber bedenken Sie: Im 
Sonderheft bekommen Sie auf 
durchschnittlich 150 Seiten (re¬ 
daktionelle Beiträge, Gesamt¬ 
seitenzahl 164) geballte Infor¬ 
mationen zu einem oder zwei 
Themenschwerpunkten. Zu¬ 
dem finden Sie im Sonderheft 
häufig wesentlich umfangrei¬ 
chere Programme, als sie bei¬ 
spielsweise das AMIGA-Maga- 
zin veröffentlichen kann. 

Bei den Themen, die wir Ihrer 
Meinung nach im Sonderheft 
berücksichtigen sollen, stehen 
Tips & Tricks, Grafik und Pro¬ 
grammieren ganz vorn. 

Die Auswertung aller Einsen¬ 
dungen hat zu vielen neuen 
Ideen geführt, die wir in den 
kommenden Heften umsetzen 
werden. Bereits in diesem Son¬ 
derheft finden Sie eine völlig 
neue Rubrik: den Workshop. 

Unter dieser Rubrik werden 
wir intensive Hilfestellung zur 
bestmöglichen Ausnutzung 
einzelner Programme geben. 
Schritt für Schritt lernen Sie so 
den effektiven Einsatz eines 
Anwendungsprogramms, einer 
Programmierhilfe (z.B. in die¬ 
sem Heft PowerWindows) oder 
eine Verknüpfung mehrerer 
PD-Programme kennen. 

Natürlich verändern sich die 
Interessen, wenn der Amiga 
vertrauter wird. Wir möchten 
Sie auch weiterhin bitten, uns 
Ihre Meinung mitzuteilen. 

Die Sonderhefte-Redaktion 
freut sich auf Ihre Anregungen. 

(rs) 
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Bild 2. Unsere Redaktions¬ 
assistentin Sylvia Derenthal 
als Glücksfee. Sie zog 
den Fragebogen von Tho¬ 
mas Steininger aus allen Ein¬ 
sendungen heraus. 


Bild 1. 
Dieses 
Doppellauf¬ 
werk von 
Soyka 
steht nun 
bei Tho¬ 
mas Stei¬ 
ninger 


Die Umfrage aus dem Sonderheft 2 hat 
viele neue Anregungen gebracht. Zahlrei¬ 
che Leser haben uns ihre Meinung mitge¬ 
teilt, wofür wir herzlich danken. Unter allen 
Einsendungen haben wir den Gewinner 
des Doppellaufwerks von Soyka Daten¬ 
technik ausgelost. Lesen Sie, welche Er¬ 
gebnisse die Umfrage erbracht hat und 
was unsere Leser von uns erwarten. 


I m Sonderheft 2 hatten wir 
eine Bitte an Sie gerichtet: 
Wir fragten nach Ihrer Mei¬ 
nung zum AMIGA-Sonderheft. 
Sie hatten dadurch die Chance, 
sich aktiv an der Gestaltung der 
Sonderhefte zu beteiligen. 
Zahlreiche Leser haben diese 
Möglichkeit genutzt. Die stati¬ 
stische Auswertung der Umfra¬ 
ge ist inzwischen abgeschlos¬ 
sen, hier einige der Ergebnisse: 

Bei der Selbsteinschätzung 
der Einsender erlebten wir eine 
kleine Überraschung: 11 Pro¬ 
zent aller Einsender bezeich¬ 
nen sich als Einsteiger ohne 
Vorkenntnisse. Wir hatten die¬ 
sen Anteil etwas geringer ein¬ 
geschätzt. Als Einsteiger be- 
zeichneten sich 35 Prozent aller 
Leser. DiegröBteGruppe bilden 
mit knappen Vorsprung die 
Fortgeschrittenen mit 39 Pro¬ 
zent. Auf erfahrene Fortge¬ 
schrittene und Profis entfallen 


15 Prozent. Dieses 
Ergebnis und auch die Er¬ 
fahrungen aus zahlreichen Te¬ 
lefongesprächen und Briefen 
zeigt: Es ist sehr wichtig, 
Grundlagen noch genauer zu 
erklären, damit auch die Ein¬ 
steiger viel Freude an den Son¬ 
derheften haben. Diese Aufga¬ 
be nehmen wir sehr ernst. 


Der richtige Weg 


Die Bewertung der Sonder¬ 
hefte 1 und 2 zeigt, daß wir auf 
dem richtigen Weg sind: 65 
Prozent gaben beim Kriterium 
»informativ« die Noten 1 und 2, 
64 Prozent vergaben diese No¬ 
te für das Merkmal »verständ¬ 
lich«. Trotz dieser guten Bewer¬ 
tung werden wir weiter bemüht 
sein, auch das restliche Drittel 
voll zufriedenzustellen. 

Bei dem Preis von 16 Mark 
pro Sonderheft hagelte es dann 


Das Doppellaufwerk 
ist vergeben 
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Programmabbruch in Assembler 

Bei manchen Assembler-Programmen ist nach Ausführung eine 
sofortige Rückkehr in das System oder, wenn das Programm vom 
Assembler aus gestartet worden ist, in den Assembler nicht wün¬ 
schenswert. Vielmehr möchte man sich vielleicht am Bildschirm 
die Resultate der Programmausführung, eine Grafik oder ähnli¬ 
ches, erst in Ruhe anschauen. Irgendwann sollte das Programm al¬ 
lerdings zurückkehren. Die folgende Routine zeigt ein Beispiel mit 
einer möglichen Lösung dieses Problems. Aus der Adresse 
$dff00a wird die Position des Mauszeigers auf dem Bildschirm ge¬ 
lesen und in das Bildschirmfarbregister geschrieben. 

LOOP: MOVE $DF00A,$DFF180 
ANDI.B #64,$BFE001 
BNE LOOP 
RTS 

Durch Bewegen der Maus kommt nun auf dem Bildschirm Farbe 
ins Spiel. Der eigentliche Kern — das Testen der Speicherstelle, in 
der ein Druck auf die linke Maustaste registriert wird — mit dem 
ANDI-Befehl beendet das Programm nach einer entsprechenden 
Betätigung der Taste. (Martin Dencker/rs) 


Mit beiden Armen tief im System 

Hier ein paar kleine Routinen für die Assembler-Freaks: Abfrage 
der rechten Maustaste: 

LOOP: BIST #10,$DFF016 
BNE.S LOOP 

Power-LED dunkel: 

OR.B #2,$BFE001 

Power-LED hell: 

ANDI.B #253,$bfe001 

Unterroutine für die Initialisierung einer eigenen Copperliste: 
set_user_copperlist: 

MOVE.L 4,A6 
LEA Gfxname,Al 
JSR -408(A6) 

MOVE.L D0,A5 
ADD.L #$32,A5 
MOVE.L A5»savecop2 
MOVE.L (A5),savecop 
MOVE.L #COPLIST,(A5) 

RTS 

Unterroutine für das Entfernen einer eigenen Copperliste: 
recall_old_copperlist: 

MOVE.L savecop,A5 
MOVE.L savecop2(A5) 

RTS 

Label, die von den Copper-Routinen gebraucht werden: 
gfxname: dc.b ''graphics.library'',0 
even 

savecop: dc.l 0 
savecop2: dc.l 0 

(Warnung der Redaktion: Sie sollten wissen was Sie tun, wenn 
Sie in dieser oder anderer Form direkt auf die Hardware des Amiga 
zugreifen.) (Christian Zaenker/rs) 

Abfrage der Sondertasten 
in Assembler 

cmp.b #$33 , $BFEC01 

bne loop 

Diese Schleife wartet, bis die Commodore-Taste (A500) bezie¬ 
hungsweise die linke Amiga-Taste (A1000,A2000) gedrückt wird. 
Das kurze Programm vergleicht das Hardware-Register $BFEC01 
mit dem Absolutwert $33. Dieser Wert entspricht dem Ereignis: 
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»Commodore-Taste gedrückt« beziehungsweise »linke Amiga-Ta¬ 
ste gedrückt«. Die folgende Tabelle gibt einige weitere Werte an, 
die bei Drücken bestimmter Tasten im Register SBFECOl stehen. 


Taste 

Hex-Wert 

Dez-Wert 

<rightAmiga> 

$31 

49 

<leftAmiga> 

$33 

51 

<CrRL> 

$39 

57 

<ALT> 

$37 

55 

<rightShift> 

$3d 

61 

<leftShitt> 

$3f 

63 


(Marco Boria/rs) 


Profi-Tips fiir 
Programmierer 

Tricks und Kniffe sind für effektives Pro¬ 
grammieren unentbehrlich. Stöbern 
Sie in der Auswahl der besten Tricks zu 
C und Assembler, die wir aus den Jahr¬ 
gängen 1987 und 1988 des AWIIGA- 
Magazins zusammengestellt haben. 


Direkt in die Bitmap 

Für besonders schnelle Assembler-Programme ist es oft wün¬ 
schenswert, Punkte auf dem Bildschirm direkt durch Adressierung 
der Bitplanes anzusprechen. Eine Möglichkeit hierzu bieten die 
zwei Unterroutinen »PSet« und »PCIear«: 

PClear: 

move.b #$b5, label+1 

PSet: 

divu #8, dO 

mulu #40, dl 

add.w dO, dl 

swap dO 

raove.b iff, d2 

sub.b dO, d2 

label: 

bset d2, (a5,dl) 
move.b #$f5, label+1 
rts 

Die Unterprogramme sind mit dem Seka-Assembler geschrie¬ 
ben. Um einen Punkt zu setzen oder zu löschen, rufen Sie »PSet« 
beziehungsweise »PCIear« auf. Übergeben Sie folgende Werte in 
den genannten Registern: 

X-Koordinate des Punktes in dO 
Y-toordinate des Punktes in dl 
Zeiger auf Bitplane in a5. 

Die Startadressen der Bitplanes eines Screens sind leicht zu fin¬ 
den. Die Intuition-Funktion »OpenScreen« liefert den Zeiger auf die 
Screendaten. Addieren Sie zu diesem Wert #$C0. An der berech¬ 
neten Stelle befindet sich die Adresse der ersten Plane. Der Pointer 
auf die zweite und alle weiteren Planes liegt jeweils 4 Byte höher. 

Diese direkte Programmierung der Bitplanes ist etwas für Tüftler 
und birgt viele Fehlerquellen. Sie können Punkte auch durch einfa¬ 
che Angabe der toordinaten mit Hilfe der Systemroutinen in der 
»graphics.library« setzen und löschen. In Basic steht Ihnen hierfür 
der Befehl PSET zur Verfügung. Allerdings sind diese Befehle ein 
wenig langsamer. (David Czock/rs) 
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IPS & TRICKS 


Super-Hochauflösung 

überall steht geschrieben, der Amiga hätte eine maximale Bild- 
Schirmauflösung von 640 x 512 Punkten. In Wahrheit steht Ihnen 
eine weit höhere Auflösung zur Verfügung. Ein Screen kann bis zu 
704 X 564 Punkte groß sein. Die 69376 zusätzlichen Punkte können 
Sie mit Hilfe der Grafikbefehle des Betriebssystems ohne weiteres 
nutzen. Besonders in C und Assembler ist dies recht einfach. Zwei 
Zahlen müssen geändert werden: 

Um einen Screen zu öffnen, müssen Sie eine »NewScreen«- 
Struktur erstellen. Der dritte Wert dieser Tabelle gibt die Screen- 
breite an, der vierte die Höhe. Üblichenveise stehen dort, beispiels¬ 
weise für einen hochauflösenden Screen im Interlace-Modus die 
Werte 640 und 512. Ersetzen Sie diese Werte durch 704 bezie¬ 
hungsweise 564. 

NewScreen.Width=704j 
NewScreen.Helght=564; 

Wenn Sie nun die Funktion »OpenScreen« anspringen, er¬ 
scheint der übergroße Screen. Er ist aber nur zum Teil sichtbar. Um 
dem abzuhelfen, müssen Sie folgendes ändern: 

Erstens sollten Sie das Bild des Monitors etwas verkleinern und 
neu zentrieren. Die Regler hierzu befinden sich im allgemeinen an 
der Rückseite des Monitors. 

Zweitens müssen Sie das Bild mit Hilfe der »Preferences« nach 
oben links verschieben. Klicken Sie hierzu das große Rechteck in 
der Mitte des »Preference-Windows« an und bewegen das gesamte 
Fenster mit der Maus in die gewünschte Ecke. Für die genaue Ein¬ 
stellung ist ein wenig Experimentieren notwendig. Sie dürfen das 
Bild nicht zu weit verschieben, da sonst der obere Rand des 
Screens verschwindet. Wenn Sie den Monitor einmal eingestellt 
haben, können Sie in Ihren Programmen sofort die »Super-Hoch¬ 
auflösung« ausprobieren. 

Der Effekt läßt sich im übrigen auch in allen anderen View-Modi 
ausnutzen, um mehr Punkte darzustellen. So stehen Ihnen zum 
Beispiel für einen LowRes-Screen 352 statt der üblichen 320 Punk¬ 
te in der Horizontalen zur Verfügung. 

Warum nicht gleich die volle Auflösung? 

Die Einschränkung auf 640 x 512 Punkte erfolgt, weil nicht alle 
Monitore diese extreme Auflösung darstellen können (Overscan¬ 
ning). Besonders an den Rändern kommt es zu Unregelmäßigkei¬ 
ten. Außerdem sind in den Grenzbereichen nicht alle Sprites sicht¬ 
bar. (Jürgen Brendel/rs) 


Zufallszahlen In Assembler 


Für Grafiken, Spiele und mathematische Funktionen benötigen 
Programmierer häufig Zufallszahlen. Basic unterstützt diesen 
Wunsch durch das Statement RNDQ. In Assembler muß sich der 
Programmierer selber helfen. Er kann auf einige Hardwareregister 
zugreifen, die sich laufend ändern. Zum Beispiel ein Register, des¬ 
sen Wert der Position des Rasterstrahls auf dem Bildschirm ent¬ 
spricht: 


rnd: 

clr.l dO 
move.w $dff006,d0 
cmp.w #0,dl 
beq c 
a: 

cmp.w dl,dO 
bge b 
c: 
rts 
b: 

sub.w dl,d0 
bra a 


; Register löschen 
; zufälligen Wert laden 
j ist eine Obergrenze da? 


; Zufallswert zu groß? 


j Rücksprung 

; Grenze abziehen 
; weiter vergleichen 


Um die Routine aufzurufen, müssen Sie erst die größte erlaubte 
Zufallszahl In dl übergeben. Andernfalls löschen Sie dieses Regi¬ 
ster. Füllen Sie doch einmal ein Fenster mit Zufalls-Punkten: 


Start: 

ExecBase: EQU 4 
OpenLib: EQU -408 
CloseLibrary: EQU -4l4 


movem.l d0-d7/a0-a6,-(sp) ; Register retten 

move.l ExecBase,a6 
lea Graphicsname,al 
jsr 0penLib(a6) 
move.l d0,GFX_Base 
lea Intname,al 
jsr OpenLib(a6) 
move.l d0,Int_Base 
move.l #1000,d5 
move.l GFX_Base,a6 
d: 

move.w #200,dl 
jsr rnd 
move.w d0,d3 
move.w #600,dl 
jsr md 
move.w d3,dl 
move.l Int_Base,al 
move.l $34(al),al 
move.l 50(al),al 
jsr -324(a6) 
dbra d5,d 

move.l ExecBase,a6 
move.l GFX_Base,al 
jsr CloseLibrary(a6) 
move.l Int_Base,al 
jsr CloseLibrary(a6) 
movem.l (sp)+,d0-d7/a0-a6 
rts i zurück 

EVEN 

Graphicsname: dc.b 'graphics.library',0 
EVEN 

Intname: dc.b 'Intuition.library',0 

EVEN 

GFX_Base: dc.l 0 
Int_Base: dc.l 0 

Sie können beide Listings in der angegebenen Fassung sowohl 
mit dem Seka- als auch dem auf der Fish-Disk 110 befindlichen 
»A68k«-Assembler übersetzen. 

Da die Zufallsroutine ein sich kontinuierlich veränderndes Regi¬ 
ster verwendet, sind die nacheinander abgerufenen Zahlen nicht 
vollkommen unabhängig. Besser wäre es, die Werte mehrerer 
Hardwareregister zu kombinieren, um Zufallszahlen zu erzeugen. 
Zufallszahlen lassen sich auch mathematisch berechnen. Viel¬ 
leicht haben Sie schon einen passenden Algorithmus hierzu ent¬ 
wickelt? (Gerhard Mattner/rs) 

Schnelle Schleifen in C 

Bei Schleifen lohnt es sich, Zeit zu sparen: 
main () 
int X 

for ( x=0; X < 5000000 j x-h-) 

Diese Schleife mit 5 Millionen Durchläufen benötigt etwa 46 Se¬ 
kunden, wenn Sie das Programm von der RAM-Disk starten. We¬ 
sentlich schneller wird die Schleife durchlaufen, wenn Sie Regi¬ 
stervariabien verwenden: 
main() 

register int x; 

for ( x=0; X < 5000000; x++) 

Dieser »Loop« benötigt nur 23 Sekunden. Eine vergleichbare As¬ 
sembler-Schleife ist noch schneller: 

Start: 

move.l #5000000,d2 
loop: 

dbra dl, loop 
rts 

Eine solche Schleife benötigt nur noch 7 Sekunden. 

(Andreas Moshammer/rs) 


; Graflcs.lib öffnen 


; Intuition.lib öffnen 


; Zahl der Punkte 


; y-max 

; retten 
; x-max 


; Zeiger auf aktuelles 
; Fenster ermitteln 
; Zeiger auf Rastport 
; Draw Pixel 
; nächster Punkt 
; alles wieder schließen 
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Bildschirmsplitting 


Diese kleine Farbdemonstration splittet den Bildschirm in zwei 
Hälften. Das Prt^ramm demonstriert die Abfrage der Position des 
Rasterstrahls mit Hilfe der Hardware-Register. 


execbase = 4 
forbid = -132 
permid = -138 
Start: 

movem.l dO-d2/al/a2/a6,-(SP) 

lea $dff004,al ; u.a. Y-POS des Rasterstrahls 

lea $dffl80,a2 ; Farbregister 


move.l execbase,a6 

jsr forbid(a6) ; Multitasking aus 

zeilenloop: 

move.l #$2bOO,dO ; >>2b<< = Zeile für Split 
; >>lb<< = Minimum 


Farbloop: 

move.w #$0000,dl ;erste Farbe 
wait: 

move.l (al),d2 ; 

and.l #$0001ff00,d2j y-Pos. in d2 
cmp.l d0,d2 j Zeile erreicht ? 

bne wait 

move.w dl,(a2) ) neue Farbe ins Register 

waitl: 

move.l (al),d2 
and.l #$0001ff00,d2 
cmp.l d0,d2 

beq waitl ; nächste Zeile abwarten 

cmp.b # $bc,$bfeOOl 

beq done jlinke Maustaste gedrückt ? 

add.w #$100,dl jneue Farbe 

cmp.w #$1000,dl ;Farbe wechselt laufend 


blt wait 

add.l #$0100,dO jSplitzeile +1 

cmp.l #$13900,dO jgrößer Maximum? 

blt farbloop 
bge zeilenloop 
done: 

move.l execbase , a6 
jsr permid(a6) 

movem.l (sp)+,d0-d2/al/a2/a6 
rts 


Das Programm ist mit dem Seka-Assembler geschrieben. Nach 
dem Start wird zunächst jeder weitere Task gesperrt. Danach ver¬ 
ändert das Programm ab einer bestimmten Bildschirmzeile die 
Hintergrundfarbe. Zur besseren Demonstration wird diese Farbe 
laufend geändert. Nach Durchlaufen der Farbskala erhöht das Pro¬ 
gramm die Zeile, in der der Bildschirm gesplittet werden soll. Sie 
können den Programmablauf jederzeit durch einen Druck auf die 
linke Maustaste stoppen. Ein Nachteil des Programms ist, daß der 
Prozessor auf eine bestimmte Rasterposition wartet und nichts an¬ 
deres erledigen kann. Noch besser wäre es daher, die Farbe des 
Hintergrunds mit Hilfe des Coppers ab einer bestimmten Position 
zu verändern, aber das ist eine andere Geschichte. 

(Klaus Kuphal/ts) 


Es geht auch ohne Maus 

Gehören Sie zu den Anwendern, die die Maus auch mal beiseite 
legen und nur mit dem CU arbeiten? Insbesondere O und Assem¬ 
blerprogrammierer benötigen keine Workbench-Umgebung. Dann 
werden Sie sicherlich eine Diskette anlegen, bei der das Amiga- 
DOS-Fenster nach dem Booten gar nicht erst geschlossen wird. 
Am einfachsten geht dies, indem Sie den Befehl LOADWB in der 
»Startup-Sequence« entfernen. Dabei entsteht das Problem, daß 
das Fenster nach dem Start mit der Maus auf die volle Größe ge¬ 
bracht werden muß, um die PAL-Auflösung zu nutzen. Doch wo ist 
die Maus? Wieder müssen Sie dieselbe aus der Schreibtisch¬ 


schublade hervorkramen. Aber halt, es geht auch einfacher. Die¬ 
ses C-Programm, in die »Startup-Sequence« eingebunden, schafft 
Abhilfe: 

#include <exec/types.h> 

#include < intuitlon/intuitlon.h> 
struct IntuitionBase ^IntuitionBase; 
main() 

[ 

IntuitionBase = (struct IntuitionBase*) 

OpenLibrary ( "Intuition.library*’,0); 
if (IntuitionBase == 0) exit (0)j 
SizeWindow (IntuitionBase -> ActlveWindow, 0, 
56); 

CloseLibrary (IntuitionBase); 

] 

In den ersten beiden Zeilen werden die benötigten Include-Files 
eingebunden. Der Zeiger auf die IntuitionBase wird eingerichtet 
und in mainQ die Intuition-Bibliothek geöffnet. Die Funktion »Size¬ 
Window« verändert die Größe eines Windows: 

SizeWindow (Zeiger auf Fenstersti^tur, dy, dx) 

In diesem Fall wird das aktuelle Fenster, also das CLI-Window 
um 56 Pixel in der Vertikalen vergrößert. Zum Schluß wird die Libra¬ 
ry geschlossen und zurück zum CLI gesprungen. Eine einfache, 
aber wirkungsvolle Sache. (Dirk Brammerls/rs) 


Ein- und Ausblenden in C 

Die folgende Funktion demonstriert Ihnen die Technik, Texte und 
Grafiken einzublenden: 

einblendeO [ 
char 1; 

for (l=0;i<=15;i-H-) [ 

SetRGB4(window-> RPort,1,i,i,i); 

^ Delay (2); ] 

Um mit dieser Funktion ein Einblenden zu erreichen, setzen Sie 
zunächst in einem Fenster mit Namen »window« die Farben 0 und 
1 auf Schwarz. Verwenden Sie hierzu die SetRGB4-Funktion aus 
der »graphics.library«. Tragen Sie statt der Variablen i den Wert Null 
ein. Als nächstes schreiben Sie Ihren Text mit der Farbe 1 in das 
Fenster. Natürlich erkennen Sie noch nichts. Alles ist »schwarz auf 
schwarz«. Erst durch den Aufruf von »einblendeO« wird der Text 
langsam sichtbar. Mit der Funktion »DelayO« aus der »dos.library« 
bestimmen Sie die Verzögerung. 

Die Routine zum Einblenden läßt sich vielfältig manipulieren. Er¬ 
setzen Sie beispielsweise im Schleifenkopf die Zeile: 

for (i=15;i>0;i—) 

Nun haben Sie die Funktion zum Ausblenden eines Textes pro¬ 
grammiert. Die angegebenen Libraries müssen Sie natürlich vor¬ 
her öffnen, sonst klappt nichts. (Peter Hug/rs) 


Gute Reaktion im CU 

Manchmal möchte man die »Startup-Sequence« anhalten und 
auf eine Reaktion des Benutzers warten lassen. Es bietet sich an, 
einen CLI-Befehl zu schreiben, in C ist dies relativ einfach: Sie kön¬ 
nen das Makro »getchar« aus »stdio.h« verwenden; 

#include <stdio.h> 
main() 

[ 

getcharO; 

] 

Das ist einfach. Das kleine Programm wartet auf das Betätigen 
einer Taste. Noch professioneller sieht ein Programm aus, das auf 
den Druck auf eine Maustaste wartet. Dafür gibt es noch kein Ma¬ 
kro. Doch Sie können dem Programm über IDCMP eine Meldung 
schicken, wenn die Maustaste gedrückt wird. Hierzu brauchen Sie 
den Zeiger auf das Fenster, in welchem Ihr Programm läuft. Glückli- 
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cherweise kann man den Pointer (Zeiger) auf das aktuelle CLI-Fen- 
ster über Intuition-Base abfragen: 

/* WaitMouse.c - Wartet auf Linke Maustaste */ 

#include <lntultion/intuitionBase.h> 
struct IntuitionBase *Intuitionbase; 
struct Window *WindowPtrj 
main() 

[ 

IntuitionBase =(struct IntuitionBase*) 

OpenLibrary("Intuition.library",0); 
WindowPtr = IntuitionBase->ActiveWindow; 

ModifyIDCMP(WindowPtr,MOUSEBUTTONS); 

Wait(l< <WindowPtr->UserPort->mp_SigBit); 
ReplyMsg(GetMsg(WindowPtr->UserPort)); 
ModlfyIDCMP(WindowPtr,0)j 
CloseLibrary(IntuitionBase)j 
] 

In compilierter Form (+L Option) kann man das Programm wun¬ 
derschön als CLI-Befehl ven/venden und in eigene Start-Sequen¬ 
zen einbauen. (Rade Sotonica/r$) 


Film ab: Bitte nicht stören 

Bei der Programmierung von animierter Grafik in C kann es Vor¬ 
kommen, daß die Grafik stark ruckelt, wenn man bei laufendem 
Programm eine Diskette in das Laufwerk legt, die Mausknöpfe 
drückt oder die Tastatur benutzt. 

Durch eine Erhöhung der Task-Priorität läßt sich dies vermeiden. 
Das folgende Beispiel zeigt wie es gemacht wird: 

#Include <exec/types.h> 

#include <exec/tasks.h> 

struct Task *Task 

maln () 

E 

Task = FindTask(O) ; 

/* aktuellen Task ermitteln*/ 

SetTaskPri (Task,127); /* Priorität erhöhen*/ 

/* Hier Programm einfügen */ 

SetTaskPri (Task,0) ; /*Priorität zurücksetzen*/ 

) 

Nach Ermitteln des aktuellen Tasks durch die Funktion »Find- 
Task«, wird dessen Priorität auf 127 gesetzt. Am Ende muß aber 
wieder der alte Zustand hergestellt werden. (Stefan Brabec/rs) 

Start von der Workbench 

Die meisten Assembler-Programmierer werden wohl schon ein¬ 
mal gemerkt haben, daß ein Maschinenprogramm beim Start von 
der Workbench (per Mausklick) erst einmal eine Message (Bot¬ 
schaft) entgegennehmen muß. Wie dies gemacht wird, steht in den 
meisten Büchern, die sich mit Assembler-Programmierung be¬ 
schäftigen. Was oft zu kurz kommt, ist die Tatsache, daß die Bot¬ 
schaft vom Programm erwidert werden muß. Vergißt man die Ant¬ 
wort, wartet die Workbench vergeblich auf den Rückruf; die Messa¬ 
ge wird zur »Speicherleiche«. Man erkennt diesen Zustand daran, 
daß das Icon der Programm-Diskette nicht verschwindet, wenn sie 
aus dem Laufwerk genommen wird. 

Ein korrektes Beispiel für die Annahme einer Botschaft zeigt das 
Listing für den Seka-Assembler: 
execbase = 4 
Forbid = -132 
FindTask = -294 
WaitPort = -384 
GetMsg = -372 
ReplyMsg = -378 


Start: 


move.l 

execbase, a6 



move. 1 

a7, Stackpointer 


Stackzeiger retten 

clr.l 

Message 

} 

Messagepointer auf 0 

sub.l 

al,al 

• 

} 

al = 0 

jsr 

FindTask(a6) 

} 

Zeiger auf eigenen Task 

move.l 

d0,a4 



tst.l 

$ac(a4) 

} 

Test auf Start vom CLI 

bne 

Main 

} 

ja, dann Sprung 

lea 

$5c(a4),a0 

} 

Zeiger auf MessagePort 

jsr 

VaitPort(a6) 

ß 

auf Botschaft warten 

jsr 

GetMsg(a6) 

J 

und entgegennehmen 

move.1 
Main: 

dO,Message 

f 

Message retten 

.... 


} 

eigentliches Programm 

Ende: 




tst.l 

Message 

} 

Message holen 

beq.s 

NoMessage 



move.1 

execbase,a6 



jsr 

Forbid(a6) 

} 

Multitasking aus 

move.1 

Message,al 



jsr 

ReplyMsg(a6) 

) 

Antworten 

NoMessage: 



move.1 

Stackponter,a7 

} 

Stackpointer herstellen 

clr.l 

dO 

ß 

kein Fehler 


data 

Stackpointer: dc.l 0 
Message: dc.l 0 

end 

Das Retten des Stackpointers und das Aufrufen der Funktion 
Forbid ist absolut notwendig; sonst wird der Guru aktiv. Mit den ge¬ 
zeigten Ergänzungen ist ein Programm sowohl vom CLI als auch 
von der Workbench lauffähig. Sie können das Programm auch an 
jede Stelle (auch in Unterprogrammen) mit »bra ende« verlassen. 
Der Zeiger auf den Stack wird am Ende ohnehin »restauriert«. 

(Martin Gräfe/rs) 

Joystickabfrage in Assembler 

Die Verwendung von Assembler ist eine Alternative zu Basic 
oder C, um schnelle Programme zu erzeugen. Um von einem Ma¬ 
schinenprogramm den Joystick abzufragen, gibt es zwei Verfah¬ 
ren: 

1. Sie können das »Gameport-Device« verwenden. Der Haken an 
der Sache: Ihr Programm wird aufgebläht und langsam. 

2. Als Alternative bleibt, den Joystickport direkt abzufragen. Grei¬ 
fen Sie mittels weniger Assemblerbefehle direkt auf die Hardware- 
r^ister zu. Das folgende Programm kehrt nach seinem Aufruf mit 
einem Wert in dO für den Joystick in Port 0 zurück. Den entspre¬ 
chenden Wert für Port 1 finden Sie in dl: 

JOYODAT =$DFF00A 
JOYIDAT =$DFF00C 
JOYTEST =$DFF036 
Lesejoystick: 

clr.w JOYTEST ; Löschen der Mausregister 
move.w JOYODAT,dO ; JoyPort 0 lesen 
move.w JoylDAT,dl ; JoyPort 1 lesen 
rts 

In den Registern dO und dl stehen je nach Stellung des ange¬ 
schlossenen Joysticks diese Werte: 

$0200 links 
$0300 links oben 
$0201'links unten 
$0100 oben 
$0000 Mitte 
$0001 unten 
$0102 rechts oben 
$0002 rechts 
$0003 rechts unten 

Einfacher und schneller geht es nicht. (Jörg Schmidt/rs) 
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Der MC 68010 im Amiga 

Diejenigen Leser, die ihren Amiga mit dem MC 68010 aufgerüstet 
haben (s. Ausgabe 8/9 1987 des AMIGA-Magazins), mußten fest¬ 
stellen, daß einige wenige Programme hartnäckig ihren Dienst ver¬ 
weigern. Der Grund liegt in der Betriebssystemroutine »User 
State«, die nicht berücksichtigt, daß der 68010 bei einer »Excep- 
tion 4« vier Worte auf den Supervisor-Stack ablegt. Abhilfe schafft 
hier ein kleines Assembler-Programm namens »NewUserState«, 
das einfach eine neue UserState-Routine im Speicher installiert 
und sinnvollerweise gleich mit der Startup-Sequence aufgerufen 
wird. Genau wie das Original im ROM benötigt die neue Routine 
beim Aufruf als einzigen Parameter die Adresse des Super¬ 
visor-Stacks im Datenregister DO. 

ExecBase: EQU 4 

AllocMem: EQU-198 

UeerState: EQU-156 

InstallPatch: 

MOVE.L ExecBase,A6 

MOVE.L # Patchlänge,DO 

CLR.L Dl 

JSR AllocMem(A6) 

TST.L DO 

BNE.S Okay 

MOVEQ #100, DO 

RTS 
Okay: 

MOVE.L D0,A0 

MOVE.L D0,A2 

MOVE.L # Patchlänge,DO 

LEA NewUserState,Al 

Loop: 

MOVE.B (A1)+,(A0)+ 

DBF DO,Loop 

MOVE. L A2,2-i-Userstate( A6) 

CLR.L DO 

RTS 

} Hier nun die eigentliche Routine, 

; die in den Speicher kopiert wird. 

NewUserState: 

OR.W #$2000,SR 

MOVE.W SR,Dl 

MOVE.L A7,USP 

MOVE.L D0,A7 

BCLR #$OOOD,D1 

MOVE.W Dl,SR 

RTS 

PrEnde: 

Patchlänge: EQU PrEnde-NewUserState (Michael Paar/rs) 

Aus die Maus 

Schalten Sie den Mauszeiger aus, wenn er Sie stört: Wer nur mit 
dem CLI arbeitet, fühlt sich eventuell häufig durch den Zeiger der 
Maus belästigt. Immer erscheint er dort, wo etwas Wichtiges steht 
und dann ist die Maus gerade nicht zur Hand. Mit zwei kleinen Pro¬ 
grammen können Sie die Maus an- und ausschalten; 

/* MouseOff */ 

#include <exec/types.h> 

#include <intuition/intuitionbase.h > 

#include < intuition/Intuition.h> 

#include <functions.h> 

struct IntuitionBase *IntuitionBase; 
struct GfxBase *GfxBasej 

#define LIBRARY_VERSION 0 
#define POINTERJtEIGHT 15 
UWORD Unvisiblelmage [POINTERHEIGHT * 2 4] = 


0 , 0 , 

0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 

0 , 0 

]; 

main() 

E 

if ((IntuitionBase = (struct IntuitionBase *) 
OpenLlbrary ("Intuition.library", 
LIBRARY.VERSION)) == NULL) 
exit(lO); 

if ((GfxBase = (struct GfxBase *) 

OpenLlbrary ("graphics.library", 
LIBRARY.VERSION)) == NULL) 
exlt(lO )} 

SetPointer(IntuitionBase-> 

ActiveWindow, &UnvisibleImage[0],15,15,-8,-7)j 
printf("Weg isser....\ n\ n"); 

CloseLibrary(GfxBase); 

CloseLlbrary(lntuitionBase)j 

] 

Wenn Sie die Maus wieder sehen möchten, verwenden Sie das 
zweite Programm: 

/* MouseOn */ 

#include <exec/types.h> 

#include <Intuition/intuitionbase.h> 

#include <intultion/intuition.h> 

#include <functions.h> 

struct IntuitionBase *IntuitionBasej 

struct GfxBase ^GfxBase; 

#define LIBRARY.VERSION 0 
#define POINTEILHEIGHT 15 
inain() 

E 

if ((IntuitionBase = (struct IntuitionBase *) 
OpenLlbrary ("Intuition.library", 
LIBRARY.VERSION)) == NULL) 
exit(lO); 

if ((GfxBase = (struct GfxBase *) 

OpenLlbrary ("graphics.library", 
LIBRARY.VERSION)) == NULL) 
exit(lO )} 

ClearPointer (IntuitionBase->ActiveWindow)j 
printf( "Wieder da\ n\ n"); 

CloseLibrary(GfxBase); 

CloseLibrary(IntuitionBase); 

] 

Beide Programme sind mit dem Aztec-C-3.40a geschrieben. Die 
Aufrufe zum Compilieren lauten: 

cc MouseOff +1 
ln MouseOff.o -lc32 +CD 

»MouseOn.c« übersetzen Sie analog. Die Option -fCD ist nicht 
unbedingt erforderlich. Und wenn Ihre Maus jetzt noch einmal 
stört, wissen Sie, was Sie tun müssen. (Stefan Sperling/rs) 

Gute Vorarbeit von Aztec-C 

Bei dem C-Compiler von Aztec handelt es sich schon um einen 
schnellen Compiler. Nur wenn der Programmierer mit vielen Inclu- 
de-Dateien arbeitet, dauert die Übersetzung eines Programms 
recht lange. Dies macht sich vor allem bei der Entwicklung eines 
Programms bemerkbar, wenn der Programmierer den Compiler 
häufig einsetzt. Bei jeder kleinsten Änderung Im Quell-Text muß ein 
Programm neu compiliert werden und jedesmal müssen die Inclu- 
de-Dateien neu geladen werden. Wer viel Speicher besitzt, kann 
diese Dateien zumindest in der RAM-Disk speichern. Aber an den 
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Include-Dateien ändert sich in der Regel bei der Software-Entwick¬ 
lung nichts. Müssen diese Dateien immer von neuem übersetzt 
werden? Könnte man nicht Zeit sparen, wenn die Dateien quasi vor- 
compiliert vorlägen. Genau diese Option wird von Aztec-C bereits 
unterstützt. Die Lösung heißt »pre-compiling«. 

Dabei wird ein File compiliert, aber noch kein Assemblercode er¬ 
zeugt. Statt dessen liefert der Compiler quasi eine Vorstufe des 
übersetzten Quellcodes und speichert die Informationen wie etwa 
Symboltabellen auf Diskette. 

Beim endgültigen Compilieren wird dieser Code wieder gela¬ 
den. Die Inlucde-Anweisungen im Quellprogramm können dann 
entfallen. 

Und wie funktioniert das in der Praxis? Schauen wir uns ein Bei¬ 
spiel an. Man erstellt zunächst ein Programm-Segment, das nur 
aus Include-Anweisungen besteht: 

INCLUDE <stdio.h> 

INCLUDE < intuitLonbase.h> 

INCLUDE <exec/execbase.h> 

Nun rufen Sie den Compiler auf: 
cc Name [Optionen] +hINCLUDE.PRE 

— Name kennzeichnet unser Programm, das die Include-Aufrufe 
enthält. 

— Die Optionen sind genauso zu setzen, wie beim normalen Com¬ 
pilieren. 

— INCLUDE.PRE schließlich ist der Name des precompilierten Fi¬ 
les. Achten Sie darauf, daß zwischen +h und INCLUDE.PRE keine 
Leerzeichen auftauchen. 

Um die präparierte Datei benutzen zu können, ist der folgende 
Aufruf notwendig: 

cc programmname [Optionen] +iINCLUDE.PRE 
Bevor Sie diese neue Technik ausprobieren — Sie werden begei¬ 
stert sein — noch ein Hinweis: Im normalen Programmcode dürfen 
jetzt natürlich nicht mehr die Include-Dateien aufgerufen werden, 
die bereits übersetzt wurden. Ansonsten tritt ein Fehler auf (»Label 
declared twice«). Andere Includes dürfen natürlich verwendet wer¬ 
den. Aber warum noch Includes im Quell-Code verwenden? Es 
geht doch jetzt auch mit vorcompilierten Dateien. 

(Michael Friedrich/rs) 

Panorama-Fenster oder Bullauge 

Es existieren schon viele Programme, die dafür sorgen, daß das 
Amiga-DOS-Fenster auf die volle Größe des Bildschirms vergrö¬ 
ßert. Die Variante »size« ist etwas Besonderes: 

#include "intuitlon/intuitionbase.h" 
struct IntultlonBase »IntuitionBase; 

VOID niain(argc, argv) 

SHORT arge; 

TEXT »argv[]; 

I 

struct Window »Window; 

if((argcl=2)]] ((»argv[l]U'b')&&(»argv[l]! = 's'))) 

I 

printf( "Usage: %8 [s][b]\n'', argv[0]); 
exit(FALSE); 

I 

if(!(lntuitionBase=OpenLibrary("Intuition.library", 0))) 

( 

printf("Can't open IntuitionXn"); 
exit(FALSE); 

1 

Window=IntultlonBase->ActiveWindow; 

If(Window!=NULL) 

( 

if(*argv[l]=='b') 

[ 

MoveWlndow{Wlndow, -Window->LeftEdge, -Window->TopEdge); 
SizeWindow(Window, IntuitionBase->ActiveSereen-> 

Width-Window-> Width, IntuitionBase-> 
ActiveScreen->Height-Window->Height); 
WindowToFront{Window); 

] 


Tips & tricks 


eise if(»argv[l]=s's') 

! 

SizeWindow(Window, -Window->Width+85, -Window->Height+23); 
MoveWindow(Window, IntuitionBase->ActiveScreen-> 

Width-85, IntuitionBase-> ActiveScreen-> 
Height-23); WindowToBack(Wlndow); 


CloseLibrary(IntuitionBase); 

] 

Wenn Sie C-Programme nach dem Compilieren ins Verzeichnis 
»c« Ihrer Workbench kopieren, können Sie das DOS-Fenster jeder¬ 
zeit auf die volle Größe bringen. Rufen Sie lediglich »size b« auf. 
Der Befehl kann auch in der »Startup-Sequence« stehen. Und was 
ist das Besondere an »size«? Wenn Sie »size s« verwenden, verklei¬ 
nert der Amiga das DOS-Window und schiebt es rechts unten in die 
Ecke. (Peter Fettke/rs) 


Metacomco unter Kontrolle 

Gibt man während des Assemblierens mit dem Assembler von 
Metacomco (V11.00) <CTRL F> ein, wird der aktuelle Status im 
folgenden Format ausgegeben: 

*** Pass X Line y Errors z 

Eine ausgezeichnete Möglichkeit, um den Stand der Überset¬ 
zung zu verfolgen. (Stefan Riege/rs) 


Schwupps, weg ist es 

Auch Sie kennen bestimmt den System-Requester »TASK¬ 
HELD«. Wenn Sie aber noch einen weitereren CLI-Prozeß laufen 
haben, können Sie meistens noch sehr lange Weiterarbeiten, ohne 
daß der Rechner ganz abstürzt. Doch es stört, wenn dann das 
zweite oder dritte dieser Fenster auf dem Bildschirm steht. Mit dem 
Programm »whap« können Sie die störenden Fenster eliminieren. 
Rufen Sie einfach Whap auf und klicken Sie das Fenster an, das 
verschwinden soll: 

#include <lntuition/lntuitionbase.h> 
struct IntuitionBase »IntuitionBase; 

VOID mainO 

( 

lf{I(IntuitionBase=(struct IntuitionBase») 

OpenLibrary("Intuition.library", LIBRARY_VERSION))) 

( 

printf{"Can't open IntuitioniXn*); 
exit{FALSE); 

] 

Delay(300); 

If(IntuitionBase-> ActiveWindow) 

CloseWindow(IntuitionBase->ActiveWindow); 

Clo3eLibrary(IntuitionBase); 

I 

Zur Funktionsweise: Nachdem das Programm die »Intuition.li¬ 
brary« geöffnet hat, wartet es etwa sechs Sekunden — danach 
schließt »whap« einfach das aktive Window. (Peter Fettke/rs) 


Verbessertes CLS in C 

Das Bildschirmlöschen geht in Cauch mit »puts{"\f");«. Daser¬ 
gibt, zumindest beim Aztec-C, kompakteren Code und damit kürze¬ 
re Ladezeiten eines CLS-Programms. Mit printfO sollte jeder schrei¬ 
ben: 

printfC^f"); 

statt 

printf("\fSc",12) 

Der Code 12 ist zwar beim Amiga und allen MS-DOS-Computern 
ein Seitenvorschub, aber nicht auf allen Computern. Im Interesse 
der Portabilität und der Verständlichkeit sollte jeder C-Programmie- 
rer die Standardzeichen verwenden. (Tassilo Schinhammer/rs) 
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Was tun bei »Task heid«? 

Wer einen schwerwiegenden Programmierfehler gemacht und 
den Amiga dadurch zum Absturz gebracht hat, kennt die Meldung 
»Task held, finish all DIsc-activity«. Was viele aber nicht wissen: Die¬ 
se Meldung besagt, daß lediglich dieser eine Task angehalten wur¬ 
de. Wenn Sie zu diesem Zeitpunkt noch einen weiteren Task laufen 
haben, zum Beispiel ein zweites CLI, können Sie mit diesem pro¬ 
blemlos Weiterarbeiten. Vor allem Einsteiger schalten bei dieser 
Meldung nämlich den Computer aus und wieder ein, da sie mei¬ 
nen, er wäre vollständig abgestürzt. (Teuf Weidemann/rs) 


Der Profi-Tip: 

Eingebauter Debugger beim Amiga 

Wußten Sie schon, daß im Amiga-Betriebssystem (im Kickstart- 
ROM) ein Debugger eingebaut ist? Er heißt »ROM-Wack« und ist 
ein Subset des Debuggers, der auf der Makroassembler-Disk aus 
dem Entwicklerpaket unter dem Namen WACK gespeichert ist. 
ROM-Wack wird bei einem »Guru Meditation Error« angesprun¬ 
gen, wenn am RS232-Port des Amiga ein Terminal angeschlossen 
ist (vielleicht sogar ein alter C_64 mit Terminalprogramm oder ein 
unwürdiger MS-DOS-Clone). Über dieses Terminal kann dann im 
Speicher des Amiga auf Fehlersuche gegangen werden. 

ROM-Wack läßt sich auch vom CLI aus aufrufen. Ist die Work- 
bench noch nicht geladen (also <CrRL D> beim Booten), kann 
mit dem Befehl »LOADWB -DEBUG« das ROM-Wack als Bestand¬ 
teil der Workbench geladen werden. Probieren Sie jetzt bei ge¬ 
drücktem rechten Mausknopf auf der Workbench-Menüzeile ent¬ 
lang nach rechts zu fahren. Ganz rechts erscheint plötzlich ein vor¬ 
her verstecktes Menü. Damit können Sie das über die serielle 
Schnittstelle laufende ROM-Wack aktivieren und steuern, auch 
wenn der Amiga bereits keinen Ton mehr von sich gibt (sprich: ret¬ 
tungslos abgestürzt ist). Eine ausführliche Anleitung zum ROM- 
Wack findet sich im (englischsprachigen) »Amiga-DOS Developers 
Manual«. (Manfred Kohlen/rs) 


Bildschirmscroilen in »C« 

Mit dem Befehl »ScrollRaster(rp,x,y,xmjn,ymin,xmax,ymax)« läßt 
sich in »C« der Bildschirm auf einfache Weise scrollen. Dabei ist 
»rp« ein Pointer auf ein Rasterport, x und y sind die Anzahl der 
Punkte, die in x- oder y-Richtung gescrollt werden sollen und die 
restlichen vier Parameter die Koordinaten des zu scrollenden Bild¬ 
schirmausschnittes. (Ck>rd-Henning Scholz/rs) 


Laufwerks eine brennende Sache 

Nachdem im AMIGA-Magazin 2/88, Seite 93, das Ein- und Aus¬ 
schalten der Power-LED gezeigt wurde, ist nun die Leuchtdiode 
des Laufwerks dran. Das Aufleuchten erreichen Assemblerpro¬ 
grammierer mit diesen Befehlen: 

LED: EQU $BFD100 

move.b #127,LED 
move.b #119, LED 
move.b #0, LED +512 

Auch wer in Basic programmiert, kann die LED aufleuchten 
lassen: 

LED = 12570880& 

POKE LED, 127 
POKE LED, 119 
POKE LED + 512,0 

Um die LED wieder auszuschalten, braucht man lediglich die 
letzte 0 mit dem Wert 255 auszutauschen. Das kleine Programm 
kann jeder gut brauchen, der zum Beispiel dem Anwender zeigen 
möchte, daß er die Finger vom Laufwerk lassen soll. So verhindern 
Sie, daß jemand eine Diskette zu früh aus dem Laufwerk nimmt. 
Entwarnung ist erst, wenn die Lampe erlischt. 

(Armin HeggUn/rs) 


Reservieren bestimmter 
Speicherbereiche 


Die EXEC-Funktion »AllocAbs« ist sehr nützlich, wenn bestimm¬ 
te Speicherbereiche reserviert werden sollen, um dort zum Bei¬ 
spiel eine Grafik abzulegen. Diese Funktion teilt dem Betriebssy¬ 
stem mit, daß der gewünschte Bereich im Speicher belegt ist. 
Schreibt man seine Daten in einen nicht reservierten Bereich, kann 
es passieren, daß das Betriebssystem diesen neu belegt. Mit dem 
folgenden Assembler-Programm wird zum Beispiel ein Speicher¬ 
block von $50000 bis $60000 reserviert: 


BelegeAbs: 

move.1 $04,a6 

move.l #$50000,al 
move.l #$10000,dO 
jsr -204(a6) 


j AbsExecBase 
; Startadresse 
; Anzahl der Bytes 
; AllocAbs 

(Christian Seiier/as) 


Assembien Sie mit 

Assembler-Programmierer schätzen ihre Lieblingssprache, da 
sie den direkten Zugriff auf die Hardware erlaubt: 

Das CIA-A-Register $BFE001 enthält nützliche Informationen. 
Die wichtigsten Bits dieses Registers und deren Funktionen sind: 

Bit Funktion 

1 wenn = 1 Power LED dunkel 

6 wenn = 0 dann Feuerknopf an Port 0 gedrückt 

7 wenn = 0 dann Feuerknopf an Port 1 gedrückt 

Die anderen Bits dienen zur Steuerung des Laufwerks. Die ein¬ 
zelnen Bits können mit dem Befehl: 

BTST #n,BFE001 

abgefragt werden. Ist das Zero-Flag (Z) nach dem Test gesetzt, war 
das entsprechende Bit gelöscht. 

Beim Amiga muß bekanntlich aufgrund der Multitaskingfähigkeit 
ein Speicherbereich vor der Benutzung reserviert werden. Hierzu 
dient die Funktion »AllocMem«. Nun Ist es aber so, daß man bei der 
Verwendung der Custom-Chips unbedingt Chip-Memory benötigt. 
Für andere Anwendungen wird dann aber Speicher gebraucht, der 
im Fast-Memory liegen soll. Wie kann man festlegen, welcher Spei¬ 
cher reserviert wird? Der Funktion AllocMem in der Exec-Library 
kann neben der Größe des benötigten Speicherblocks (dO) auch 
noch ein Wort mit Bedingungen übergeben werden (requirements 
in dl): 

Wert Anforderung 

2 unbedingt Chip-Memory 

4 Fast-Memory 

1 reservierter Speicher darf nicht verschoben werden 

(bei der jetzigen Version kommt dies nicht vor) 

$20000 größten freien Speicherblock belegen 
$10000 reservierten Speicher löschen 

Es können auch mehrere Bedingungen übergeben werden. Ist 
die Bedingung = 0, wird wenn möglich Fast-RAM reserviert. 

Bei manchen Programmen Ist es notwendig, Routinen des Be- 
triebssy^ems direkt anzuspringen (mit JSR FCXXXXX). Allgemein 
gesagt, ist es manchmal erforderlich, zu wissen, welche Kickstart- 
Version vorliegt. Es ist sinnvoll, in einem solchen Fall am Anfang 
des Programms zu testen, ob die richtige Version vorliegt. Eine Ab¬ 
frage in Assembler sieht wie folgt aus: 

LEA $FC0000 

CMP.l #" 33.",$lC(a0) 

BNE Fehler 

CMP.l #*'192 ",$20(a0) 

BNE Fehler 

Dieses kleine Programm prüft auf die Version 33.192. Sie können 
die Routine entsprechend Ihren eigenen Wünschen anpassen. 

(Klaus Wenger/rs) 
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CiNGABEHILFE 


Dieses Programm ist unentbehrlich 
beim Abtippen unserer Listings. 

Es hilft, Tippfehler zu vermeiden und 
spart viel Zeit. 




in längeres Listing ohne Fehler abzutippen ist (fast) un- 
mögiich. Aus diesem Grund haben wir in Ausgabe 3/88 
des AMIGA-Magazins eine Eingabehilfe — den Check¬ 
summer »Checkie 42« veröffentlicht. Die hier vorgestellte Version 
1.1 enthält erweiterte Funktionen und bietet mehr Komfort. Damit 
möglichst viele unserer Leser dieses Programm auch tatsächlich 
anwenden, haben wir es möglichst kurz gehalten und in einer 
Sprache programmiert, die alle Abtipper besitzen: Amiga-Basic. 
Die Form der Listings 

Die Listingzeilen bestehen aus einer bis zu vierstelligen Zeilen¬ 
nummer, der zwei- beziehungsweise dreistelligen Prüfsumme 
und der eigentlichen Programmzeile. Beispiel: 

10 TTO print "Hallo!" 

-Prüfcode 
-Zeilennummer 


Nach einer Leerstelle im Anschluß an die Zetlennummer stehen 
bis zu drei Zeichen Prüfcode. Die einzelnen Zeichen können sein 
eine Ziffer (»0« bis »9«), ein kleiner Buchstabe (»a« bis »z«) oder ein 
Großbuchstabe 
(»A«bis>»Z«). Die er¬ 
sten beiden Zei¬ 
chen der Prüfsum¬ 
me sind der eigent- 1 
liehe Prüfcode. Im * 
dritten Zeichen ist 
die Spaltenposition 

der ersten »Nicht-Leerstelle« verschlüsselt. Das ist für 
diejenigen Anwender interessant, welche die Struktur des Li¬ 
stings, also die Einrückungen durch Leerzeichen, übernehmen 
wollen. Ist dies nicht Ihre Absicht, können Sie die Eingabe der 
Checksumme schon nach den ersten beiden Zeichen mit 
< Return > abschließen. Bei Checkie 42 muß die Groß- und Klein¬ 
schreibung so wie im Listing abgedruckt übernommen werden. 


Cfi© 




Eingabehinweis: 

Geben Sie »Checkie 42« (Version 1.1) bitte mit Checkie 42 aus der 
AMIGA-Ausgabe 3/88 oder 12/87 ein. Sollten Sie die alte Eingabehilfe 
nicht besitzen, so tippen Sie das Listing für die Version 1.1 im norma¬ 
len Basic-Editor ohne Prüfsummen und Zeilennummern ab. 


Der Umgang mit Checkie 42 

Nach dem Start fragt das Programm nach einem Dateinamen. 
Unter dem angegebenen Namen speichert Checkie 42 die einge¬ 
gebenen Listingzeilen ab. Existiert bereits eine Datei mit diesem 
Namen auf der Diskette, so haben Sie mit der Abfrage »Nur 
Checksummer ausgeben?« zwei Möglichkeiten: 

<j> Ausgabe der Datei mit Checksumme auf den Bild¬ 
schirm oder den Drucker. 

<n> Einlesen der Programmzeilen aus der 
vorhandenen Datei und Eingabe der 
Checksumme mit der Tastatur. 


sen, in dem die Frage »Eingabe aus Datei« mit »j«« beantwortet 
wird. Dann brauchen Sie nur noch die Checksummen eingeben. 
Der Checksummer holt sich die Zeile aus der angegebenen Datei 
statt von der Tastatur. Entspricht die eingegebene Prüfzahl nicht 
der errechneten, kann die Zeile gleich korrigiert werden. 

Beantworten Sie obige Frage mit »n«, zählt Checkie die in der 
Datei vorhandenen Zeilen und wartet mit der Zeilennummer 
»Anzahl-i-1« auf die Eingabe einer neuen Zeile. Alle weiteren Ein¬ 
gaben hängt das Programm an die bestehende Datei an. Diese 
Funktion ist sinnvoll, wenn Sie ein Listing in mehreren Teilen ab¬ 
tippen wollen. 

So tippen Sie Listings ab 

Haben Sie anfangs einen Dateinamen eingegeben oder Sie 
hängen neue Zeilen an eine bestehende Datei an, dann arbeiten 
Sie im normalen Eingabemodus. Checkie 42 schlägt dabei eine 
Zeilennummer vor und wartet auf die Prüfsumme. Nach Eingabe 
derselben taucht der Cursor zwischen den zwei Trennstrichen 
auf. Dort muß nun die Zeile »ohne« Zeilennumer und Prüfsumme 
eingegeben werden. Nach Betätigen der Taste < Return > be¬ 
rechnet Checkie die Prüfsumme. Leerstellen vor und hinter der 
Programmanweisung werden ignoriert. Stimmen Programmzeile 
und Prüfsumme mit derjenigen im Listing überein, speichert der 
Checksummer die Eingabe ab und wartet auf die nächste Zeile. 
Einfügemodus: Wahrscheinlich wird eine abgetippte Zeile mal 
einen Fehler enthalten. Checkie 42 positioniert den Cursor dann 
an den Anfang der Zeile und wartet auf die korrekte Eingabe. Kor¬ 
rekturen lassen sich mit der Backspace- oder Delete-Taste durch¬ 
führen. Um Zeichenfolgen einzufügen, kann kurzfristig mit 
<F2> der Einfügemodus eingeschaltet werden. Dieser Modus 
sollte allerdings nach der Fehlerkorrektur wieder ausge¬ 
schaltet werden, da 
er die Eingabe ver¬ 
langsamt. 
Sonderfall-Prüf¬ 
summe ignorie¬ 
ren: Möchten Sie 
zum Beispiel eine 
Kommentarzeile 
nicht »original« übernehmen, läßt sich trotz einer falschen Prüf¬ 
summe eine Übernahme der Zeile mit der Funktionstaste < F6 > 
erzwingen. Sie können damit aber auch falsche Programmzeilen 
übernehmen. Verwenden Sie deshalb die Taste <F6> nicht ge¬ 
wohnheitsmäßig. Der Checksummer teilt Ihnen nach Beenden 
des Programms mit, wieviel Zeilen er ungeprüft übernommen hat. 
Prüfsumme undZeilennummer ändern: Natürlich kann es auch 
Vorkommen, daß die Programmzeile zwar richtig abgetippt wurde, 
sich bei der Prüfsumme aber ein Fehler eingeschlichen hat. Nach 
Betätigen von <F1> kann die Prüfsumme korrigiert werden. 
Während der Eingabe der Prüfsumme läßt sich mit <F7> die 
vom Programm vorgeschlagene Zeilennummer verändern. Da¬ 
mit können Sie gezielt nur bestimmte Teile eines Listings über¬ 
nehmen. 

Haben Sie eine mit einem anderen Editor geschriebene Pro¬ 
grammdatei überprüft und nur in wenigen Zeilen Fehler festge¬ 
stellt, lassen sich durch Vorgabe der Nummern diese Zeilen ge¬ 
zielt ändern. Bei Angabe der Zeilen nummer in aufsteigender Rei¬ 
henfolge benötigt das Programm übrigens erheblich weniger Zeit 
fürdieSuchederZeilen in der jeweiligen Datei. Um die versehent¬ 
liche Übernahme fehlerhafter Zeilen zu verhindern, sperrt das 
Programm bei fehlender Übereinstimmung der Prüfsummen die 
Taste <F7> (Änderung der Zeilennummer). 




Beide Alternativen sind gedacht für Anwender, die ein Listing 
nicht mit dem Zeiteneditor des Checkie, sondern mit einem 
schnelleren und/oder komfortableren Editor ihrer Wahl — zum 
Beispiel dem Editor von Amiga-Basic (mit »..",a« speichern) er¬ 
faßt haben. 

Checkie 42 errechnet nach der Eingabe <j> die Prüfsummen Ih¬ 
res Textes und Sie können diese dann mit dem Listing im 
AMIGA-Magazin vergleichen. Bei der Ausgabe auf den Bild¬ 
schirm schreibt das Programm die Programmzeilen inklusive 
Checksummen zusätzlich in eine Datei auf Diskette mit dem Zu¬ 
satz ».chk«. Diese können Sie später zum Beipiel mit dem CLI- 
Befehl TYPE ohne erneute Berechnung der Prüfsumme noch ein¬ 
mal ausgeben. 

Haben Sie »Nur Checksumme ausgegeben?« mit »n« beant¬ 
wortet, dann können Sie dem Programm den Vergleich überlas¬ 


Fehlerfrei abtippen 

Eingabe beenden: Die Kombination < CtrI-e > beendet den Pro¬ 
grammlauf nach vollständiger Eingabe des Listings oder für eine 
Unterbrechung. 

Am Schluß noch ein Tip für alle Leser, denen unser Basic-Editor 
zu langsam ist. Die Berechnung der Prüfsummen erfolgt im Un¬ 
terprogramm »CalcSumme«. DieserTeil ist sehr einfach in schnel¬ 
lere Sprachen, wie beispielsweise C, umsetzbar. 

Wer schon einmal Fehler in einem abgetippten Listing gesucht 
hat, der weiß, wie frustrierend diese Arbeit sein kann. Nutzen Sie 
deshalb den »Checkie 42«. Sie sparen viel Zeit und müssen sich 
nicht dauernd auf die Suche nach tückischen Fehlern begeben. 

(Dieter Behlich/kn) 
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CINGABEHILFE 


180 LB2 

ELSEIF e«8 THEN 

181 4hi 

IF i>l THEN 

182 3Z6 

i=i-l : REM <BS> 

183 XI 

LOCATE sy,sx+l : PRINT 

184 un4 

END IF 

185 Tn2 

ELSEIF e»13 THEN 

186 KZ4 

IF i=An 2 CsZ THEN l=AnaC8Z+l : REM <CR> 

187 cL2 

ELSE 

188 ra4 

IF e>47 AND e<58 THEN 

189 vl6 

e»e-4a : REM 0-9 

190 AI4 

ELSEIF e>64 AND e<91 THEN 

191 Rv6 

e=e-55 : REM A-Z 

192 jX4 

ELSEIF e>96 AND e<123 THEN 

193 Zx6 

e=e-6l : REH a -2 

194 jS4 

ELSE 

195 yz6 

GOTO blinken : REH weder noch 

196 6s4 

END IF 

197 JY 

PRINT e$; 

198 ve 

cs(l)>e 

199 D7 

i»i+l 

200 A32 

END IF 

201 vn 

IF KsAnzCaZ THEN blinken 

202 f50 

;SEnde: 

203 2K2 

COLOR 1,0 

204 Oh 

LOCATE 8y,sx-15 

205 öO 

PRINT 'CheokBumme:' 

206 gl 

RETURN 

207 aEO 

leuZeile: 

208 dU2 

IF FZok » wahr THEN 

209 P44 

NeuZeile>0 

210 nn 

UHILE e<>13 OR NeuZelle-O 

211 l)x6 

LOCATE 2 y,i:PRINT USINO '# # # #';NettZelle; 

212 OF 

e»ASC(INPUT$(l)) 

213 gP 

IF e>47 AND e<58 THEN NeuZelle<NeuZeile»10+e-4e 

214 Jn 

IF NeuZelle > 9999 THEN e>8 

215 in 

IF e«8 THEN Neu2elle»lNT(NeuZeile/lO) 

216 vj4 

UEND 

217 kh 

IF Checkfile THEN 

218 t(36 

IF NeuZelle < Zelle THEN 

219 yj8 

tfHILE NOT EOF(l) 

220 VGA 

LINE INPUT#l.e$ 

221 aä 

PRINT#2,e$ 

222 ipe 

UEND 

223 HH 

CLOSE 1 : CLOSE 2 

224 n 

OOSUB Backup 

225 Xa 

OPEN dn$+'.bak* FOR INPUT AS #1 

226 TI 

OPEN än$ FOR OUTPUT AS #2 

227 9t 

Zeile>l 

228 cV6 

END IF 

229 Yp 

UHILE (NeuZelle > Zelle) AND (NOT EOF(l)) 

230 f(38 

LINE INPUT#l,e$ 

231 mn 

PRINT#2,e$ 

232 17 

Zeile«Zeile+l 

233 C06 

UEND ‘ 

234 oR 

IF EOF(l) THEN 

235 bL8 

CLOSE 1 

236 8i 

NeuZelle*Zelle 

237 uN 

LOCATE ay,l;PRINT USING '# # # #';NeuZeile; 

238 90 

Checkfile.O 

239 ng6 

END IF 

240 oh4 

END IF 

241 vV 

ZeilecNeuZelle 

242 qJ2 

END IF 

243 HtO 

RETURN 

244 IH 

EingabeZeile; 

245 n72 

xscs(AnzCaZ) 

246 BUO 

weiter: 

247 ga2 

cy»zy+INT(x/LBZeile)icx» 2 x+(x MOD LBZeile) 

248 vy 

LOCATE oy,cx 

249 o6 

COLOR 0,1 

250 iDl 

PRINT CHR5(2(x))i 

251 yi 

LOCATE cy,cx 

252 68 

IF x>apos THEN apos°x 

253 M 

IF Checkfile AND FZok THEN 

254 wl4 

IF EOF(l) THEN 

255 0R6 

Cheekfile=0 : CLOSE 1 

256 jS4 

ELSE 

257 ix6 

e$=INPUT$(l,l) 

258 624 

END IF 

259 raV2 

ELSE 

260 Q24 

e$>INKEY$ 

261 922 

END IF 

262 gp4 

IF e$="" THEN weiter 

263 01 

COLOR 1,0 

264 OU 

PRINT CHR$( 2 (x)); 

265 CF 

LOCATE oy,cx 

266 80 

e=ASC(e$) 

267 ÜR2 

IF ((e AND 127)<32) OR e=127 THEN Controleode 

268 op 

IF iniode THEN GOSUB insert 

269 16 

PRINT e$ 

270 Ki 

2 (x)=e : e=30 




271 3D0 

.Controlcode: 

272 gF2 

IF e=13 OR e=10 THEN 

273 1N4 

RETURN 

274 092 

ELSEIF e=30 THEN 

275 2p4 

a=l 

276 Ea2 

ELSEIF e=29 THEN 

277 034 

a=LBZeile 

278 6G2 

ELSEIF e=31 THEN 

279 DD4 

a=-l 

280 Gb2 

ELSEIF e=28 THEN 

281 Rg4 

B°-LBZeile 

282 982 

ELSE 

283 UX4 

GOTO noCrs 

284 HP2 

END IF 

285 hz 

xsx-fa 

286 5Z 

IF x>*0 AND x<LZelle THEN weiter 

287 tD 

x«x-a 

288 HB 

GOTO weiter 

289 kEO 

noCrs; 

290 dN2 

IF e=8 THEN 

291 ls4 

IF x>0 THEN 

292 Kk6 

x=x-l 

293 AM 

LOCATE zy+INT(x/LBZelle),zx+(x MOD LBZeile) 

294 Bb 

FOR l=x TO apoa 

295 788 

z{l)-z(i+l) 

296 Ja 

PRINT CHR$(z(l)); 

297 ZO 

IF 1 MOD LBZelle=59 THEN PRINTiPRINT TAB(zx); 

298 FV6 

NEXT 1 

299 pr 

z(apo8)»32 : PRINT ' ' 

300 yR 

apos^apos-l 

301 ng4 

END IF 

302 H12 

ELSEIF e»127 THEN 

303 Kk4 

FOR i»x TO apo8 

304 GH6 

z(i)«z{l+l) 

305 Sj 

PRINT CHR$(z(l))i 

306 19 

IF 1 MOD LBZeile«59 THEN PRINT:PRINT TAB(zx); 

307 0e4 

NEXT 1 

308 yO 

z(Bpos)=32 ; PRINT ' * 

309 7a 

apos*apoa-l 

310 Vy2 

ELSEIF e.l29 THEN 

311 oI4 

GOSUB ElngabeSuffljne 

312 sC 

x*cs(AnzC8Z) 

313 9U2 

ELSEIF e-130 THEN 

314 513 

Imodeoimode XOR 1 

315 tU5 

LOCATE 7,28 

316 yZ3 

IF Imode THEN 

317 iT5 

PRINT 'au8' 

318 jS3 

ELSE 

319 YV5 

PRINT 'ein' 

320 6z3 

END IF 

321 Kg2 

ELSEIF e-131 THEN 

322 L54 

GOSUB loesehen 

323 3N 

xsC8(AnzC8Z) 

324 7Y2 

ELSEIF e .134 THEN 

325 hD4 

RETURN 

326 PR2 

ELSEIF e»5 THEN 

327 2T4 

FEnde«wahr 

328 eC 

RETURN 

329 F82 

END IF 

330 xr 

GOTO weiter 

331 IfO 

Ineert: 

332 oJ2 

IF apoB>x THEN 

333 3o4 

FOR l«apo8 TO x STEP -1 

334 Qt6 

z(l+l)«z(i) 

335 q64 

NEXT 1 

336 PH 

8(k)*32 

337 Ny 

apos°apoB>l 

338 Kp 

IF apos>LZelle THEN apo 8 >apo 8 -l:z(LZeile ):32 

339 uK 

FOR l*x TO apos 

340 116 

PRINT CHR$(z(i)); 

34l Hi 

IF 1 HOD LBZelle.59 THEN PRINT:PRINT TAB(zx); 

342 xD4 

HEXT i 

343 yA 

LOCATE zy+INT(x/LBZeile),zx+(x MOD LBZeile) 

344 UN2 

END IF 

345 vX 

RETURN 

346 eXO 

CalcSunme: 

347 3b2 

8=0 : b=0 : e=0 

348 z2 

IF e=134 THEN 

349 pv4 

FZok=wahr 

350 WX 

FF6=FF6+1 

351 0z2 

ELSE 

352 hv4 

UHILE z(8po8)=32 AND apo8>0 

353 PI6 

apos=apos-l 

354 9x4 

UEND 

355 NI 

IF apos>0 THEN 

356 036 

UHILE z(o)=32 

Listing. Der verbesserte »Checkie 42«. Bitte mit der 
ersten Version von »Checkie 42« oder ohne Prüfsummen 

und Zeilennummern eingeben. 
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CINGABEHILFE 


Impressum 


357 Bt8 

o=c+l 


358 D16 

UEND 


359 jc4 

END IF 


360 EJ 

FOR 1=0 TO apos 


361 Y26 

J=(i-o) MOD AnzFak 


362 Qs 

k»(l+l-e) KOD AnzFak 


363 31 

e=a+((z(l) AND 127)-32)»Fektor{j) 


364 2E 

b=b+Ü8Ü) AND 127)-32)»Faktor(k) 


365 Ka4 

NEXT l 


366 pA 

oa(4)=a+Zelle-INT((a+Zeile)/62)»62 


367 4N 

086 )*b+Zelle-INT((b+Zelle)/62)»62 


368 4q 

FZok=(ce(l)=os(4)) AND (oa(2)=08(5)) 


369 tm2 

END IF 


370 Kw 

RETURN 


371 pMO 

Uebemahme: 


372 sD2 

FOR 1=0 TO apos 


373 ih4 

PRINT#2,CHR$(8(1)); 


374 TJ2 

NEXT 1 


375 VZ4 

PRINT#2," 


376 5R2 

Zelle«Zeile+l 


377 R3 

RETURN 


378 N90 

fertig: 


379 MJ2 

IF Checkfile THEN 


380 ZZ4 

WHILE NOT EOF(l) 


381 6r6 

LINE INPUT#l.e$ 


382 DE 

PRINT#2.e$ 


383 oQ4 

WEND 


384 Ok 

CLOSE 1 


385 922 

END IF 


386 5q 

CLOSE 2 


387 nt 

CLR 


388 Rg 

LOCATE 12,35 


389 WL 

PRINT 'F E R T I 0 111' 


390 19 

LOCATE 20,1 


391 Dl 

IF FF6O0 THEN 


392 C14 

PRINT 'ACHTUNCllI 


393 9H 

PRINT FF6;' Zelle(n) Hurde(n) ungeprOft gespeichert.' 

394 IB2 

END IF 


395 JL 

RETURN 


(C) 1988 

HiT 


Listing. Der verbesserte »Checkie 42« 

(Schluß) 



PUBLIC DOIAIN 



ubiic DomaIrvSoftware Ist »die« Alternative 
zu teuren, professionellen Programmen. 

V Besonders für den Amiga gibt es eine wahre 

Fhit von PD-Software. Kenner sprechen von über 
2000 Disketten aus über 50 verscNedenen Serien. 

Doch wer kann — angej^hts dieser Masse — 
auch rHJT annäherrKl den Überblick behalten? Wir 
haben uns auf dem PD-Markt umgesehen und die 
»Rosinen« für Sie herausgepickt. 

Programmieren ist das umfangreichste Thema 
in fast allen PD-Reihen. Ar>gefangen von Tools 
und Utilities über leistur^sfähige Compiler bis hin zu 
umfangreichen DeispiehBibliot^ken ist alles ent¬ 
halten, was dem Programmierer die Arbeh erleichtert. 
Ausführliche Workshops ermöglichen Ihnen 
den professionellen Einsatz dieser Werkzeuge. 

^ Ein professkxrelles Grafikproiekt reizt die Mög- 
^ lichkeiten des Amiga auch ohne teure Software 
voll aus. 

Wt Eine AuswaN der besten Utilities erspart Ihnen 
w langes Suchen in den umfar^reichen 
Sammlungen. 

Das fünftB Sonderhaft Hegt ab dem 17.Mal an ihrem Kiosk. 
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Textverarbeitungsprogramme 
auf dem Amiga wurden bisher 
von Profis belächelt. Sie waren 
langsam wie Schreibmaschi¬ 
nen, bunt wie Kindergeburts¬ 
tage, absturzsicher wie Starfigh¬ 
ter oder teuer wie Schweizer 
Uhren. Bis Documentum kam... 
Rasend schnell • Automa¬ 
tische Trennhilfe • Fußnoten¬ 


verwaltung • Editier-/ 
WYSIWYG-Bildschirm 

• Blockbearbeitung • Kopf-/ 
Fußzeilen • Seitennumerie¬ 
rung • Blockbearbeitung 

• Alle Amiga-Zeichensätze 
nutzbar • Tastatur- oder Maus¬ 
bedienung • Buchdruckoption 




Markt&Technik-Produkte 
erhalten Sie in den Fachabteilungen 
der Warenhäuser, im Versandhandel, 
in Computer-Fachgeschäften oder 
bei Ihrem Buchhändler. 


Markt&Technik 

Zeitschriften ■ Bücher 
Software • Schulung 


• Suchen/Ersetzen • NLQ- 
Druck für alle Drucker 

• multitaskingfähig • und 
vieles, vieles mehr... 

Für Briefschreiber. Studie¬ 
rende. Autoren. Bürokraten - 
eigentlich für alle. 

Bestell-Nr. 54122 

DM 149,-* (sFr 135,-'/ÖS 1490,-* 

• Unverbindliche Preisempfehlung 


Fragen Sie Ihren Fachhändler 
nach unserem kostenlosen Gesamtverzeichnis 
mit über 500 aktuellen Computerbüchern 
und Software Oder fordern Sie es direkt 
beim Verlag an! 


Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München, Telefon (089) 4613-0 

Bestellungen im Ausland bitte an: SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415656. ÖSTERREICH: Markt&Technik Verlag 
Gesellschaft m.b.H., Große Neugasse 28, A-1040 Wien, Telefon (0222) 5871393-0; Rudolf Lechner&Sohn, Heizwerkslraße 10. A-1232 Wien, Telefon (0222) 677526; 
Ueberreuter Media Verlagsges.mbH (Großhandel), Laudongasse 29, A-1082 Wien, Telefon (02.22) 481543-0. 
























Welt von Disneyland - jetzt auf Ihrem Amiga. 
Mit MovieSetter erstellen Sie Trickfilme - auch 
wenn Sie kein Profi sind. MovieSetter ermöglicht es, in 
kürzester Zeit komplexe, minutenlange Animations¬ 
sequenzen zu erstellen - mit insgesamt nur 1 Mbyte 
Speicher. Per Mausklick erzeugen Sie aus vorher 
erstellten Brushes eine fließende Bewegung vor fest¬ 
stehendem oder beweglichem Hintergrund. Plazieren 
Sie Geräusche innerhalb des Programms 
und verändern Sie die Tondauer, Tonlage 
und -stärke; durch Steuern der Tonkanäle 
können Sie auch Stereoeffekte erzielen. 


Zahlreiche vorgefertigte Movie-Clips werden mitgelie¬ 
fert. Spezielle Animationseffekte erreichen Sie durch 
Farbdurchlauf oder Playback von bis zu 60 Sequenzen 
pro Sekunde. 

Dieses neue Animationsprogramm ist nicht nur für den 
Anfänger leicht zu erlernen, es ist auch für den Trick¬ 
filmprofi ein vielseitiges Werkzeug. 

Bestell-Nr.: 54128, Preis: DM 198,-* (sFr 178,-7öS 1980,-*) 
Deutsche Version in Vorbereitung. 

Update DM 49,-* (sFr 49,-*/öS 490,-*) 

(lieferbar 1. Quartal 1989). 

'Unverbndlicfte Preisempfehlung 


Markt&Technik-Produkle 
erhalten Sie in den Fachabteilungen 
der Warenhäuser, im Versandhandel, 
in Computer-Fachgeschäften oder 
bei Ihrem Buchhändler 


Fragen Sie Ihren Fachhändter 
nach unserem kostenlosen Gesamtverzeichnis 
mit über 500 aktuellen Computerbüchern 
und Softiware. Oder fordern Sie es direkt 
beim Verlag an! 


Zeitschriften ■ Bücher 

Software • Schulung 
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